G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Number");
G2antt1->Columns->Add(L"Format");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("1.23"));
	var_Items->set_CellValueFormat(TVariant(h),TVariant(1),Exg2anttlib_tlb::ValueFormatEnum::exComputedField);
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant("2 * %0 + ` (2 * Number)`"));
	h = var_Items->AddItem(TVariant("1.23"));
	var_Items->set_CellValueFormat(TVariant(h),TVariant(1),Exg2anttlib_tlb::ValueFormatEnum::exComputedField);
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant("3 * %0 + ` (3 * Number)`"));
	h = var_Items->AddItem(TVariant("1.23"));
	var_Items->set_CellValueFormat(TVariant(h),TVariant(1),Exg2anttlib_tlb::ValueFormatEnum::exComputedField);
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant("currency(%0) + ` ( Currency(Number) )`"));
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exAllLines;
G2antt1->Columns->Add(L"Default");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->AllowInsideZoom = true;
	var_Chart->FirstWeekDay = Exg2anttlib_tlb::WeekDayEnum::exMonday;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2013,3,31).operator double()));
	var_Chart->set_PaneWidth(false,52);
	var_Chart->LevelCount = 2;
	var_Chart->UnitScale = Exg2anttlib_tlb::UnitEnum::exHour;
	var_Chart->get_Level(1)->set_Label(TVariant("<font ;6><%h%></font>"));
	var_Chart->UnitWidth = 14;
	var_Chart->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exAllLines;
	var_Chart->AllowInsideZoom = true;
	var_Chart->DefaultInsideZoomFormat->InsideUnit = Exg2anttlib_tlb::UnitEnum::exMinute;
	var_Chart->AllowResizeInsideZoom = false;
	var_Chart->InsideZoomOnDblClick = false;
	Exg2anttlib_tlb::IInsideZoomsPtr var_InsideZooms = var_Chart->InsideZooms;
		var_InsideZooms->SplitBaseLevel = false;
		var_InsideZooms->DefaultWidth = 0;
	Exg2anttlib_tlb::IInsideZoomsPtr var_InsideZooms1 = var_Chart->InsideZooms;
		var_InsideZooms1->Add(TVariant(TDateTime(2013,3,31,23,00,00,0).operator double()));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddItem(TVariant("Item"));
G2antt1->EndUpdate();

// Change event - Occurs when the user changes the cell's content.
void __fastcall TForm1::G2antt1Change(TObject *Sender,Exg2anttlib_tlb::HITEM   Item,long   ColIndex,Variant *   NewValue)
{
	OutputDebugString( L"NewValue is" );
	OutputDebugString( L"NewValue" );
}

Exg2anttlib_tlb::IEditorPtr var_Editor = G2antt1->Columns->Add(L"DropDownList-String")->Editor;
	var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DropDownListType;
	var_Editor->AddItem(1,L"NYC|New York City",TNoParam());
	var_Editor->AddItem(2,L"CJN|Cluj Napoca",TNoParam());
Exg2anttlib_tlb::IEditorPtr var_Editor1 = G2antt1->Columns->Add(L"DropDownList-Numeric")->Editor;
	var_Editor1->EditType = Exg2anttlib_tlb::EditTypeEnum::DropDownListType;
	var_Editor1->AddItem(1,L"New York City",TNoParam());
	var_Editor1->AddItem(2,L"Cluj Napoca",TNoParam());
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("NYC"))),TVariant(1),TVariant(2));

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Edit");
	var_Column->Width = 64;
	var_Column->AllowSizing = false;
	Exg2anttlib_tlb::IEditorPtr var_Editor = var_Column->Editor;
		var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::MaskType;
		var_Editor->Mask = L";;;rich";
G2antt1->Columns->Add(L"Empty");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddItem(TVariant("This is a bit ot long text"));
	var_Items->AddItem(TVariant(""));
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"DropDown");
	var_Column->Width = 64;
	var_Column->AllowSizing = false;
	Exg2anttlib_tlb::IEditorPtr var_Editor = var_Column->Editor;
		var_Editor->DropDownAlignment = Exg2anttlib_tlb::AlignmentEnum(0x20);
		var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DropDownType;
		var_Editor->AddItem(1,L"First item. This is a bit ot long text",TNoParam());
		var_Editor->AddItem(2,L"Second item. This is a bit ot long text",TNoParam());
		var_Editor->AddItem(3,L"Third item. This is a bit ot long text",TNoParam());
		var_Editor->Mask = L";;;rich";
Exg2anttlib_tlb::IColumnPtr var_Column1 = G2antt1->Columns->Add(L"PickEdit");
	var_Column1->Width = 64;
	var_Column1->AllowSizing = false;
	Exg2anttlib_tlb::IEditorPtr var_Editor1 = var_Column1->Editor;
		var_Editor1->DropDownAlignment = Exg2anttlib_tlb::AlignmentEnum(0x20);
		var_Editor1->EditType = Exg2anttlib_tlb::EditTypeEnum::PickEditType;
		var_Editor1->AddItem(1,L"First item. This is a bit ot long text",TNoParam());
		var_Editor1->AddItem(2,L"Second item. This is a bit ot long text",TNoParam());
		var_Editor1->AddItem(3,L"Third item. This is a bit ot long text",TNoParam());
		var_Editor1->Mask = L";;;rich";
G2antt1->Columns->Add(L"Empty");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("First item. This is a bit ot long text"))),TVariant(1),TVariant("Second item. This is a bit ot long text"));
	long h = var_Items->AddItem(TVariant("First item. This is a bit ot long text"));
	Exg2anttlib_tlb::IEditorPtr var_Editor2 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor2->DropDownAlignment = Exg2anttlib_tlb::AlignmentEnum(0x20);
		var_Editor2->EditType = Exg2anttlib_tlb::EditTypeEnum::DropDownType;
		var_Editor2->AddItem(1,L"First item. This is a bit ot long text",TNoParam());
		var_Editor2->AddItem(2,L"Second item. This is a bit ot long text",TNoParam());
		var_Editor2->AddItem(3,L"Third item. This is a bit ot long text",TNoParam());
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant("Second item. This is a bit ot long text"));
	Exg2anttlib_tlb::IEditorPtr var_Editor3 = var_Items->get_CellEditor(TVariant(h),TVariant(1));
		var_Editor3->DropDownAlignment = Exg2anttlib_tlb::AlignmentEnum(0x20);
		var_Editor3->EditType = Exg2anttlib_tlb::EditTypeEnum::PickEditType;
		var_Editor3->AddItem(1,L"First item. This is a bit ot long text",TNoParam());
		var_Editor3->AddItem(2,L"Second item. This is a bit ot long text",TNoParam());
		var_Editor3->AddItem(3,L"Third item. This is a bit ot long text",TNoParam());
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IEditorPtr var_Editor = G2antt1->Columns->Add(L"Date")->Editor;
	var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
	var_Editor->set_Option(Exg2anttlib_tlb::EditorOptionEnum::exDropDownBackColor,TVariant(15790320));
	var_Editor->set_Option(Exg2anttlib_tlb::EditorOptionEnum::exDropDownForeColor,TVariant(65793));
G2antt1->Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
G2antt1->EndUpdate();

// EditClose event - Occurs when the edit operation ends.
void __fastcall TForm1::G2antt1EditClose(TObject *Sender)
{
	Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
		var_Items->ClearCellBackColor(TVariant(var_Items->FocusItem),TVariant(G2antt1->FocusColumnIndex));
}

// EditOpen event - Occurs when the edit operation starts.
void __fastcall TForm1::G2antt1EditOpen(TObject *Sender)
{
	Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
		var_Items->set_CellBackColor(TVariant(var_Items->FocusItem),TVariant(G2antt1->FocusColumnIndex),RGB(255,0,0));
	Exg2anttlib_tlb::IItemsPtr var_Items1 = G2antt1->Items;
		var_Items1->set_CellValue(TVariant(var_Items1->FocusItem),TVariant(G2antt1->FocusColumnIndex),TVariant(G2antt1->Items->get_CellValue(TVariant(G2antt1->Items->FocusItem),TVariant(G2antt1->FocusColumnIndex))));
}

G2antt1->FullRowSelect = Exg2anttlib_tlb::CellSelectEnum::exColumnSel;
G2antt1->Columns->Add(L"C1")->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::EditType;
G2antt1->Columns->Add(L"C2")->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::EditType;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("v1"))),TVariant(1),TVariant("v2"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("v3"))),TVariant(1),TVariant("v4"));

G2antt1->BeginUpdate();
G2antt1->CauseValidateValue = Exg2anttlib_tlb::ValidateValueType::exValidateCell;
G2antt1->FullRowSelect = Exg2anttlib_tlb::CellSelectEnum::exColumnSel;
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exRowLines;
Exg2anttlib_tlb::IEditorPtr var_Editor = G2antt1->Columns->Add(L"Date")->Editor;
	var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
	var_Editor->Mask = TVariant(String("!99/99/9999;1;;empty=1,validateas=1,invalid=Invalid date\\, for the input mask <br><b>'<%mask%>'</b>!,warning=Invalid character") +
"!,select=4,overtype");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddItem(TNoParam());
	var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
	var_Items->AddItem(TNoParam());
G2antt1->EndUpdate();

G2antt1->Columns->Add(L"DropDown");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	Exg2anttlib_tlb::IEditorPtr var_Editor = var_Items->get_CellEditor(TVariant(var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()))),TVariant(0));
		var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor->DropDownAlignment = Exg2anttlib_tlb::AlignmentEnum::RightAlignment;
	Exg2anttlib_tlb::IEditorPtr var_Editor1 = var_Items->get_CellEditor(TVariant(var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()))),TVariant(0));
		var_Editor1->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor1->DropDownAlignment = Exg2anttlib_tlb::AlignmentEnum::CenterAlignment;
	Exg2anttlib_tlb::IEditorPtr var_Editor2 = var_Items->get_CellEditor(TVariant(var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()))),TVariant(0));
		var_Editor2->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor2->DropDownAlignment = Exg2anttlib_tlb::AlignmentEnum::LeftAlignment;
	Exg2anttlib_tlb::IEditorPtr var_Editor3 = var_Items->get_CellEditor(TVariant(var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()))),TVariant(0));
		var_Editor3->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor3->DropDownAlignment = Exg2anttlib_tlb::AlignmentEnum(0x20);
	Exg2anttlib_tlb::IEditorPtr var_Editor4 = var_Items->get_CellEditor(TVariant(var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()))),TVariant(0));
		var_Editor4->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor4->DropDownAlignment = Exg2anttlib_tlb::AlignmentEnum(0x20 | Exg2anttlib_tlb::AlignmentEnum::CenterAlignment);
	Exg2anttlib_tlb::IEditorPtr var_Editor5 = var_Items->get_CellEditor(TVariant(var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()))),TVariant(0));
		var_Editor5->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor5->DropDownAlignment = Exg2anttlib_tlb::AlignmentEnum(0x20 | Exg2anttlib_tlb::AlignmentEnum::RightAlignment);

G2antt1->Columns->Add(L"DropDown")->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	Exg2anttlib_tlb::IEditorPtr var_Editor = var_Items->get_CellEditor(TVariant(var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()))),TVariant(0));
		var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor->DropDownAlignment = Exg2anttlib_tlb::AlignmentEnum(0x20);
	Exg2anttlib_tlb::IEditorPtr var_Editor1 = var_Items->get_CellEditor(TVariant(var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()))),TVariant(0));
		var_Editor1->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor1->DropDownAlignment = Exg2anttlib_tlb::AlignmentEnum::exHOutside;
	var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));

G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exRowLines;
G2antt1->FullRowSelect = Exg2anttlib_tlb::CellSelectEnum::exColumnSel;
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Float");
	Exg2anttlib_tlb::IEditorPtr var_Editor = var_Column->Editor;
		var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::MaskType;
		var_Editor->Mask = L";;;float,digits=0,grouping=,invalid=empty,warning=invalid character";
G2antt1->Items->AddItem(TVariant(192278));
G2antt1->Items->AddItem(TVariant(1000));

G2antt1->BeginUpdate();
G2antt1->CauseValidateValue = Exg2anttlib_tlb::ValidateValueType::exValidateCell;
G2antt1->FullRowSelect = Exg2anttlib_tlb::CellSelectEnum::exColumnSel;
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exRowLines;
G2antt1->Columns->Add(L"Date");
G2antt1->Columns->Add(L"Mask");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
	Exg2anttlib_tlb::IEditorPtr var_Editor = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor->Mask = TVariant(String("{1,12}/{1,31}/{1950,2050};1;;select=1,warning=Invalid character!,invalid=Invalid date\\, for the input mask <br><b>'<%mask%>'</") +
"b>!,validateas=1");
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(var_Items->get_CellEditor(TVariant(h),TVariant(0))->Mask));
	h = var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
	Exg2anttlib_tlb::IEditorPtr var_Editor1 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor1->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor1->Mask = TVariant(String("!99/99/9999;1;;empty,validateas=1,invalid=Invalid date\\, for the input mask <br><b>'<%mask%>'</b>!,warning=Invalid character!,") +
"select=4,overtype");
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(var_Items->get_CellEditor(TVariant(h),TVariant(0))->Mask));
	h = var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
	Exg2anttlib_tlb::IEditorPtr var_Editor2 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor2->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor2->Mask = TVariant(String("!99/99/9999;;;empty,validateas=1,invalid=Invalid date\\, for the input mask <br><b>'<%mask%>'</b>!,warning=Invalid character!,s") +
"elect=4,overtype");
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(var_Items->get_CellEditor(TVariant(h),TVariant(0))->Mask));
	h = var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
	Exg2anttlib_tlb::IEditorPtr var_Editor3 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor3->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor3->Mask = TVariant(String("!99/99/9999;; ;select=4,overtype,empty,warning=Invalid character!,invalid=Invalid date\\, for the input mask <br><b>'<%mask%>'<") +
"/b>!,validateas=1");
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(var_Items->get_CellEditor(TVariant(h),TVariant(0))->Mask));
	h = var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
	Exg2anttlib_tlb::IEditorPtr var_Editor4 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor4->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor4->Mask = TVariant(String("![0-9 ][0-9 ]/[0-9 ][0-9 ]/[0-9 ][0-9 ][0-9 ][0-9 ];1;;empty,validateas=1,invalid=Invalid date\\, for the input mask <br><b>'<%") +
"mask%>'</b>!,warning=Invalid character!,select=4,leading= ");
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(var_Items->get_CellEditor(TVariant(h),TVariant(0))->Mask));
	h = var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
	var_Items->set_FormatCell(TVariant(h),TVariant(0),L"len(value) ? shortdateF(value) : ``");
	Exg2anttlib_tlb::IEditorPtr var_Editor5 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor5->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor5->Mask = TVariant(String("!99/99/9999;1;;empty,validateas=1,invalid=Invalid date\\, for the input mask <br><b>'<%mask%>'</b>!,warning=Invalid character!,") +
"select=4,overtype,leading");
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(var_Items->get_CellEditor(TVariant(h),TVariant(0))->Mask));
	h = var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
	var_Items->set_FormatCell(TVariant(h),TVariant(0),L"len(value) ? shortdateF(value) : ``");
	Exg2anttlib_tlb::IEditorPtr var_Editor6 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor6->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor6->Mask = TVariant(String("!00/00/0000;1;;empty,validateas=1,invalid=Invalid date\\, for the input mask <br><b>'<%mask%>'</b>!,warning=Invalid character!,") +
"select=4,overtype,leading");
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(var_Items->get_CellEditor(TVariant(h),TVariant(0))->Mask));
	h = var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
	var_Items->set_FormatCell(TVariant(h),TVariant(0),L"len(value) ? shortdateF(value) : ``");
	Exg2anttlib_tlb::IEditorPtr var_Editor7 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor7->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor7->Mask = TVariant(String("!00/00/0000;;0;empty,validateas=1,invalid=Invalid date\\, for the input mask <br><b>'<%mask%>'</b>!,warning=Invalid character!,") +
"select=4,overtype");
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(var_Items->get_CellEditor(TVariant(h),TVariant(0))->Mask));
	h = var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
	var_Items->set_FormatCell(TVariant(h),TVariant(0),L"len(value) ? shortdateF(value) : ``");
	Exg2anttlib_tlb::IEditorPtr var_Editor8 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor8->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor8->Mask = TVariant(String("!00/00/0000;;;empty,validateas=1,invalid=Invalid date\\, for the input mask <br><b>'<%mask%>'</b>!,warning=Invalid character!,s") +
"elect=1,overtype");
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(var_Items->get_CellEditor(TVariant(h),TVariant(0))->Mask));
G2antt1->EndUpdate();

Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Float");
	var_Column->FormatColumn = L"value format `0`";
	Exg2anttlib_tlb::IEditorPtr var_Editor = var_Column->Editor;
		var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::MaskType;
		var_Editor->Mask = L";;;float,digits=0";
G2antt1->Items->AddItem(TVariant(192278));

Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Float");
	var_Column->FormatColumn = L"value format ``";
	Exg2anttlib_tlb::IEditorPtr var_Editor = var_Column->Editor;
		var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::MaskType;
		var_Editor->Mask = L";;;float";
G2antt1->Items->AddItem(TVariant(192278));

G2antt1->CauseValidateValue = Exg2anttlib_tlb::ValidateValueType::exValidateCell;
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exRowLines;
G2antt1->FullRowSelect = Exg2anttlib_tlb::CellSelectEnum::exColumnSel;
G2antt1->Columns->Add(L"Phone")->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::MaskType;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TNoParam());
	Exg2anttlib_tlb::IEditorPtr var_Editor = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::MaskType;
		var_Editor->Mask = TVariant(String("!(999) 000 0000;1;;select=1,empty,overtype,warning=invalid characer,invalid=The value you entered isn't appropriate for the inp") +
"ut mask <b>'<%mask%>'</b> specified for this field.");
	h = var_Items->AddItem(TVariant("0123"));
	Exg2anttlib_tlb::IEditorPtr var_Editor1 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor1->EditType = Exg2anttlib_tlb::EditTypeEnum::MaskType;
		var_Editor1->Mask = L"!(999) 000 0000;2;;select=4";
	h = var_Items->AddItem(TVariant("0123"));
	Exg2anttlib_tlb::IEditorPtr var_Editor2 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor2->EditType = Exg2anttlib_tlb::EditTypeEnum::MaskType;
		var_Editor2->Mask = L"`Phone: `!(999) 000-0000";
	h = var_Items->AddItem(TVariant("(074) 876-1222"));
	Exg2anttlib_tlb::IEditorPtr var_Editor3 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor3->EditType = Exg2anttlib_tlb::EditTypeEnum::MaskType;
		var_Editor3->Mask = L"!(999) 000-0000;0";

G2antt1->Columns->Add(L"Color")->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::ColorType;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddItem(TVariant(255));
	long h = var_Items->AddItem(TVariant(255));
	Exg2anttlib_tlb::IEditorPtr var_Editor = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::ColorType;
		var_Editor->Mask = L"`RGB(`{0,255}\\,{0,255}\\,{0,255}`)`;;0";
	h = var_Items->AddItem(TVariant(255));
	Exg2anttlib_tlb::IEditorPtr var_Editor1 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor1->EditType = Exg2anttlib_tlb::EditTypeEnum::ColorType;
		var_Editor1->Mask = L"`&H`XXXXXXXX`&`;;0;overtype,insertype,warning=Wrong!";
	h = var_Items->AddItem(TVariant(255));
	Exg2anttlib_tlb::IEditorPtr var_Editor2 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor2->EditType = Exg2anttlib_tlb::EditTypeEnum::ColorType;
		var_Editor2->Mask = L"`0x`XX `0x`XX `0x`XX;;0;overtype,insertype,warning=Wrong!";
	h = var_Items->AddItem(TVariant(255));
	Exg2anttlib_tlb::IEditorPtr var_Editor3 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor3->EditType = Exg2anttlib_tlb::EditTypeEnum::ColorType;
		var_Editor3->Mask = L"R{0,255} G{0,255} B{0,255};;0;overtype,insertype,warning=Wrong!";
	h = var_Items->AddItem(TVariant(255));
	Exg2anttlib_tlb::IEditorPtr var_Editor4 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor4->EditType = Exg2anttlib_tlb::EditTypeEnum::ColorType;
		var_Editor4->Mask = L"`(hexa) RGB 0x`XXXXXX;;0;overtype,insertype,warning=Wrong!";
	h = var_Items->AddItem(TVariant(255));
	Exg2anttlib_tlb::IEditorPtr var_Editor5 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor5->EditType = Exg2anttlib_tlb::EditTypeEnum::ColorType;
		var_Editor5->Mask = L"`(decimal) Red: `{0,255}` Green: `{0,255}` Blue: `{0,255};;0;overtype,insertype,warning=Wrong!";
	h = var_Items->AddItem(TVariant(255));
	Exg2anttlib_tlb::IEditorPtr var_Editor6 = var_Items->get_CellEditor(TVariant(h),TVariant(0));
		var_Editor6->EditType = Exg2anttlib_tlb::EditTypeEnum::ColorType;
		var_Editor6->Mask = L"`(combine) Red: `{0,255}` Green: 0x`XX` Blue: `{0,255};;0;overtype,insertype,warning=Wrong!";

G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IBarsPtr var_Bars = G2antt1->Chart->Bars;
	var_Bars->Copy(L"Task",L"STask")->Color = RGB(255,0,0);
	var_Bars->Add(L"Task:STask")->Shortcut = L"TS";
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,96);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->NonworkingDaysColor = var_Chart->Bars->get_Item(TVariant("STask"))->Color;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("TS"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,16).operator double()),TNoParam(),TNoParam());

// AddItem event - Occurs after a new Item has been inserted to Items collection.
void __fastcall TForm1::G2antt1AddItem(TObject *Sender,Exg2anttlib_tlb::HITEM   Item)
{
	G2antt1->Items->set_CellMerge(TVariant(Item),TVariant(0),TVariant(1));
}

G2antt1->MarkSearchColumn = false;
G2antt1->TreeColumnIndex = -1;
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exAllLines;
G2antt1->Columns->Add(L"C1")->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellSingleLine,TVariant(false));
G2antt1->Columns->Add(L"C2");
G2antt1->Columns->Add(L"C3");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddItem(TVariant("This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple lines."));
	var_Items->AddItem(TVariant("This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple lines."));

// CellStateChanged event - Fired after cell's state has been changed.
void __fastcall TForm1::G2antt1CellStateChanged(TObject *Sender,Exg2anttlib_tlb::HITEM   Item,long   ColIndex)
{
	Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
		var_Items->set_ExpandItem(Item,false);
}

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"");
		var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column->AllowSizing = false;
		var_Column->Width = 18;
		var_Column->PartialCheck = true;
	var_Columns->Add(L"Tasks");
G2antt1->ShowFocusRect = false;
G2antt1->HasButtons = Exg2anttlib_tlb::ExpandButtonEnum::exNoButtons;
G2antt1->TreeColumnIndex = 1;
G2antt1->Indent = 14;
G2antt1->ExpandOnDblClick = false;
G2antt1->LinesAtRoot = Exg2anttlib_tlb::LinesAtRootEnum::exNoLinesAtRoot;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant(""));
	var_Items->set_CellState(TVariant(h),TVariant(0),1);
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant("Project"));
	long hChild = var_Items->InsertItem(h,TNoParam(),TVariant(""));
	var_Items->set_CellValue(TVariant(hChild),TVariant(1),TVariant("Task 1"));
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant(""));
	var_Items->set_CellValue(TVariant(hChild),TVariant(1),TVariant("Task 2"));
	var_Items->set_ExpandItem(h,true);
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"");
		var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column->AllowSizing = false;
		var_Column->Width = 18;
		var_Column->PartialCheck = true;
	var_Columns->Add(L"Tasks");
G2antt1->ShowFocusRect = false;
G2antt1->HasButtons = Exg2anttlib_tlb::ExpandButtonEnum::exNoButtons;
G2antt1->TreeColumnIndex = 1;
G2antt1->Indent = 14;
G2antt1->ExpandOnDblClick = false;
G2antt1->LinesAtRoot = Exg2anttlib_tlb::LinesAtRootEnum::exNoLinesAtRoot;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant(""));
	var_Items->set_CellState(TVariant(h),TVariant(0),1);
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant("Project"));
	long hChild = var_Items->InsertItem(h,TNoParam(),TVariant(""));
	var_Items->set_CellValue(TVariant(hChild),TVariant(1),TVariant("Task 1"));
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant(""));
	var_Items->set_CellValue(TVariant(hChild),TVariant(1),TVariant("Task 2"));
	var_Items->set_ExpandItem(h,true);
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exAllLines;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exAllLines;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2002,1,1).operator double()));
	var_Chart->Bars->get_Item(TVariant("Task"))->OverlaidType = Exg2anttlib_tlb::OverlaidBarsTypeEnum::exOverlaidBarsStackAutoArrange | Exg2anttlib_tlb::OverlaidBarsTypeEnum::exOverlaidBarsStack;
	var_Chart->set_PaneWidth(false,128);
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("Tasks"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2002,1,2).operator double()),TVariant(TDateTime(2002,1,7).operator double()),TVariant("A"),TNoParam());
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2002,1,3).operator double()),TVariant(TDateTime(2002,1,8).operator double()),TVariant("B"),TNoParam());
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2002,1,4).operator double()),TVariant(TDateTime(2002,1,9).operator double()),TVariant("C"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("A"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarColor,TVariant(255));
	var_Items->AddLink(TVariant("AB"),h,TVariant("A"),h,TVariant("B"));
	var_Items->AddLink(TVariant("BC"),h,TVariant("B"),h,TVariant("C"));
G2antt1->EndUpdate();

// Change event - Occurs when the user changes the cell's content.
void __fastcall TForm1::G2antt1Change(TObject *Sender,Exg2anttlib_tlb::HITEM   Item,long   ColIndex,Variant *   NewValue)
{
	OutputDebugString( L"NewValue:" );
	OutputDebugString( L"NewValue" );
	OutputDebugString( L"EditingValue:" );
	OutputDebugString( G2antt1->EditingText );
}

G2antt1->BeginUpdate();
G2antt1->Chart->set_PaneWidth(true,0);
G2antt1->Columns->Add(L"Edit")->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
G2antt1->Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
G2antt1->EndUpdate();

G2antt1->ShowLockedItems = true;
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exVLines;
G2antt1->Columns->Add(L"C1");
G2antt1->Columns->Add(L"C2");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->set_LockedItemCount(Exg2anttlib_tlb::VAlignmentEnum::exBottom,1);
	long h = var_Items->get_LockedItem(Exg2anttlib_tlb::VAlignmentEnum::exBottom,0);
	var_Items->set_ItemBackColor(h,RGB(128,128,128));
	var_Items->set_ItemForeColor(h,RGB(255,255,255));
	var_Items->set_CellValue(TVariant(h),TVariant(0),TVariant("footer c1"));
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant("footer c2"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("cell"))),TVariant(1),TVariant("cell"));

G2antt1->ShowLockedItems = true;
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exVLines;
G2antt1->Columns->Add(L"C1");
G2antt1->Columns->Add(L"C2");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->set_LockedItemCount(Exg2anttlib_tlb::VAlignmentEnum::exTop,1);
	long h = var_Items->get_LockedItem(Exg2anttlib_tlb::VAlignmentEnum::exTop,0);
	var_Items->set_ItemBackColor(h,RGB(128,128,128));
	var_Items->set_ItemForeColor(h,RGB(255,255,255));
	var_Items->set_CellValue(TVariant(h),TVariant(0),TVariant("footer c1"));
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant("footer c2"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("cell"))),TVariant(1),TVariant("cell"));

G2antt1->ColumnAutoResize = true;
G2antt1->Columns->Add(L"Sizable");
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"F");
	var_Column->AllowSizing = false;
	var_Column->Width = 16;

G2antt1->SortBarVisible = true;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	var_Columns->Add(L"0");
	var_Columns->Add(L"1");
	var_Columns->Add(L"2");
	var_Columns->Add(L"3");
	var_Columns->Add(L"4");
G2antt1->Layout = L"multiplesort=\"C3:1 C4:2\";singlesort=\"C2:1\"";

Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->HistogramVisible = true;
	var_Chart->HistogramHeight = 32;
	var_Chart->Bars->get_Item(TVariant("Task"))->HistogramPattern = Exg2anttlib_tlb::PatternEnum::exPatternBDiagonal;
	var_Chart->set_PaneWidth(false,128);
G2antt1->Columns->Add(L"Column");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddBar(var_Items->AddItem(TVariant("Item 1")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
	long h = var_Items->AddItem(TVariant("Item 2"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TNoParam(),TNoParam());
	var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarColor,TVariant(255));
	var_Items->AddBar(var_Items->AddItem(TVariant("Item 3")),TVariant("Task"),TVariant(TDateTime(2001,1,6).operator double()),TVariant(TDateTime(2001,1,9).operator double()),TNoParam(),TNoParam());

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IAppearancePtr var_Appearance = G2antt1->VisualAppearance;
	var_Appearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
	var_Appearance->Add(2,TVariant("c:\\exontrol\\images\\pushed.ebn"));
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->set_PaneWidth(false,128);
G2antt1->Columns->Add(L"Tasks");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("Task 1"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
	h = var_Items->AddItem(TVariant("Task 2"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
	var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarColor,TVariant(255));
	h = var_Items->AddItem(TVariant("Task 3"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
	var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarColor,TVariant(16777216));
	h = var_Items->AddItem(TVariant("Task 4"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
	var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarColor,TVariant(16777471));
	h = var_Items->AddItem(TVariant("Task 5"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
	var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarColor,TVariant(33619967));
G2antt1->EndUpdate();

// Change event - Occurs when the user changes the cell's content.
void __fastcall TForm1::G2antt1Change(TObject *Sender,Exg2anttlib_tlb::HITEM   Item,long   ColIndex,Variant *   NewValue)
{
	OutputDebugString( L"Prev Value " );
	OutputDebugString( PChar(G2antt1->Items->get_CellValue(TVariant(Item),TVariant(ColIndex))) );
	OutputDebugString( L"Check and Update the NewValue" );
	OutputDebugString( L"NewValue" );
	NewValue = TDateTime(2001,1,1).operator double();
}

G2antt1->BeginUpdate();
G2antt1->MarkSearchColumn = false;
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Date");
	var_Column->FormatColumn = L"day(value) + `/` + month(value) + `/` + year(value)";
	Exg2anttlib_tlb::IEditorPtr var_Editor = var_Column->Editor;
		var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
		var_Editor->Mask = L"{1,12}\\/{1,31}\\/{1,2099}";
G2antt1->Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
G2antt1->EndUpdate();

G2antt1->ToolTipDelay = 1;
G2antt1->ToolTipWidth = 364;
G2antt1->VisualAppearance->Add(1,TVariant("C:\\Program Files\\Exontrol\\ExG2antt\\Sample\\EBN\\frame.ebn"));
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exToolTipAppearance] = 0x1000000;
G2antt1->Columns->Add(L"tootip")->ToolTip = L"this is a tooltip assigned to a column";

Exg2anttlib_tlb::IEditorPtr var_Editor = G2antt1->Columns->Add(L"Edit")->Editor;
	var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::EditType;
	var_Editor->Numeric = Exg2anttlib_tlb::NumericEnum::exDisableSigns | Exg2anttlib_tlb::NumericEnum::exFloatInteger;
G2antt1->Items->AddItem(TVariant(1.22));

Exg2anttlib_tlb::IEditorPtr var_Editor = G2antt1->Columns->Add(L"Edit")->Editor;
	var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::EditType;
	var_Editor->Numeric = Exg2anttlib_tlb::NumericEnum::exDisablePlus | Exg2anttlib_tlb::NumericEnum::exFloatInteger;
G2antt1->Items->AddItem(TVariant(1.22));

Exg2anttlib_tlb::IEditorPtr var_Editor = G2antt1->Columns->Add(L"Edit")->Editor;
	var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::EditType;
	var_Editor->Numeric = Exg2anttlib_tlb::NumericEnum::exFloatInteger;
G2antt1->Items->AddItem(TVariant(1.22));

Exg2anttlib_tlb::IEditorPtr var_Editor = G2antt1->Columns->Add(L"Edit")->Editor;
	var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::EditType;
	var_Editor->Numeric = Exg2anttlib_tlb::NumericEnum(0xfc | Exg2anttlib_tlb::NumericEnum::exDisableSigns | Exg2anttlib_tlb::NumericEnum::exFloatInteger | Exg2anttlib_tlb::NumericEnum::exFloat);
G2antt1->Items->AddItem(TVariant(1));

Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	var_Columns->Add(L"Value");
	Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"CellSingleLine = False");
		var_Column->ComputedField = L"%0";
		var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellSingleLine,TVariant(false));
	Exg2anttlib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"FormatColumn/replace CRLF");
		var_Column1->ComputedField = L"%0";
		var_Column1->FormatColumn = L"value replace `\\r\\n` with ``";
	Exg2anttlib_tlb::IColumnPtr var_Column2 = var_Columns->Add(L"FormatColumn/replace TAB,CRLF");
		var_Column2->ComputedField = L"%0";
		var_Column2->FormatColumn = L"(value replace `\\t` with ``) replace `\\r\\n` with ``";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddItem(TVariant("a\\ta\\r\\nb\\tb"));

G2antt1->BeginUpdate();
G2antt1->DefaultItemHeight = 24;
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->LevelCount = 2;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->set_PaneWidth(false,48);
	var_Chart->NonworkingDays = 0;
	var_Chart->LinksStyle = Exg2anttlib_tlb::LinkStyleEnum::exLinkSolid;
	var_Chart->set_ShowLinksColor(Exg2anttlib_tlb::ShowLinksEnum::exUpdateColorLinksOnly | Exg2anttlib_tlb::ShowLinksEnum::exShowLinksStartFrom,RGB(255,0,0));
	var_Chart->set_ShowLinksColor(Exg2anttlib_tlb::ShowLinksEnum::exUpdateColorLinksOnly | Exg2anttlib_tlb::ShowLinksEnum::exShowLinksEndTo,RGB(0,255,0));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h1 = var_Items->AddItem(TVariant("Task 1"));
	var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant(""),TNoParam());
	long h2 = var_Items->AddItem(TVariant("Task 2"));
	var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant(""),TNoParam());
	var_Items->set_ItemBar(h2,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarSelected,TVariant(true));
	var_Items->AddLink(TVariant("L1"),h1,TVariant(""),h2,TVariant(""));
	long h3 = var_Items->AddItem(TVariant("Task 3"));
	var_Items->AddBar(h3,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant(""),TNoParam());
	var_Items->AddLink(TVariant("L2"),h2,TVariant(""),h3,TVariant(""));
	var_Items->SchedulePDM(0,TVariant(""));
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Tasks");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2006,9,19).operator double()));
	var_Chart->set_PaneWidth(false,64);
	var_Chart->NonworkingDaysPattern = Exg2anttlib_tlb::PatternEnum::exPatternSolid;
	var_Chart->ShowLinks = Exg2anttlib_tlb::ShowExtendedLinksEnum::exShowLinksFront | Exg2anttlib_tlb::ShowExtendedLinksEnum::exShowExtendedLinks;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h1 = var_Items->AddItem(TVariant("Task 1"));
	var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2006,9,20).operator double()),TVariant(TDateTime(2006,9,22).operator double()),TNoParam(),TNoParam());
	long h2 = var_Items->AddItem(TVariant("Task 2"));
	var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2006,9,26).operator double()),TVariant(TDateTime(2006,9,28).operator double()),TNoParam(),TNoParam());
	var_Items->set_ItemBar(h2,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarSelected,TVariant(true));
	var_Items->AddLink(TVariant("L1"),h1,TVariant(""),h2,TVariant(""));
	var_Items->set_Link(TVariant("L1"),Exg2anttlib_tlb::LinkPropertyEnum::exLinkText,TVariant("L1"));
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->DefaultItemHeight = 24;
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->LevelCount = 2;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->set_PaneWidth(false,48);
	var_Chart->NonworkingDays = 0;
	var_Chart->LinksStyle = Exg2anttlib_tlb::LinkStyleEnum::exLinkSolid;
	var_Chart->ShowLinks = Exg2anttlib_tlb::ShowExtendedLinksEnum::exShowExtendedLinks;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h1 = var_Items->AddItem(TVariant("Task 1"));
	var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant(""),TNoParam());
	long h2 = var_Items->AddItem(TVariant("Task 2"));
	var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant(""),TNoParam());
	var_Items->AddLink(TVariant("L1"),h1,TVariant(""),h2,TVariant(""));
	long h3 = var_Items->AddItem(TVariant("Task 3"));
	var_Items->AddBar(h3,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant(""),TNoParam());
	var_Items->AddLink(TVariant("L2"),h3,TVariant(""),h2,TVariant(""));
	var_Items->SchedulePDM(0,TVariant(""));
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,128);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long hSummary = var_Items->AddItem(TVariant("Task"));
	var_Items->AddBar(hSummary,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K1"),TNoParam());
	long hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task A"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K1"),TNoParam());
	var_Items->AddBar(var_Items->InsertItem(hTask,TNoParam(),TVariant("Task A.1")),TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K11"),TNoParam());
	var_Items->AddBar(var_Items->InsertItem(hTask,TNoParam(),TVariant("Task A.2")),TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K12"),TNoParam());
	hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task B"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K2"),TNoParam());
	hTask = var_Items->InsertItem(hTask,TNoParam(),TVariant("Task B.1"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,9).operator double()),TVariant("K21"),TNoParam());
	var_Items->set_ExpandItem(0,true);
	OutputDebugString( L"Count: " );
	OutputDebugString( PChar(var_Items->get_ItemBar(0,TVariant("<*>"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarsCount)) );
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,128);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->Bars->Copy(L"Task",L"CountTask")->Color = RGB(0,255,0);
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long hSummary = var_Items->AddItem(TVariant("Project"));
	var_Items->set_ItemBold(hSummary,true);
	long hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task A"));
	var_Items->AddBar(hTask,TVariant("CountTask"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K1"),TNoParam());
	var_Items->AddBar(var_Items->InsertItem(hTask,TNoParam(),TVariant("Task A.1")),TVariant("CountTask"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K11"),TNoParam());
	var_Items->AddBar(var_Items->InsertItem(hTask,TNoParam(),TVariant("Task A.2")),TVariant("CountTask"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K12"),TNoParam());
	hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task B"));
	var_Items->AddBar(hTask,TVariant("CountTask"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K2"),TNoParam());
	hTask = var_Items->InsertItem(hTask,TNoParam(),TVariant("Task B.1"));
	var_Items->AddBar(hTask,TVariant("CountTask"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,9).operator double()),TVariant("K21"),TNoParam());
	var_Items->set_ExpandItem(0,true);
	var_Items->DefaultItem = var_Items->get_ItemByIndex(0);
	OutputDebugString( L"Count: " );
	OutputDebugString( PChar(var_Items->get_ItemBar(-3,TVariant("<*>"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarsCount)) );
	var_Items->DefaultItem = 0;
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,128);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->Bars->Copy(L"Task",L"CountTask")->Color = RGB(0,255,0);
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long hSummary = var_Items->AddItem(TVariant("Project"));
	var_Items->set_ItemBold(hSummary,true);
	long hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task A"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K1"),TNoParam());
	var_Items->AddBar(var_Items->InsertItem(hTask,TNoParam(),TVariant("Task A.1")),TVariant("CountTask"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K11"),TNoParam());
	var_Items->AddBar(var_Items->InsertItem(hTask,TNoParam(),TVariant("Task A.2")),TVariant("CountTask"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K12"),TNoParam());
	hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task B"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K2"),TNoParam());
	hTask = var_Items->InsertItem(hTask,TNoParam(),TVariant("Task B.1"));
	var_Items->AddBar(hTask,TVariant("CountTask"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,9).operator double()),TVariant("K21"),TNoParam());
	var_Items->set_ExpandItem(0,true);
	var_Items->DefaultItem = var_Items->get_ItemByIndex(0);
	OutputDebugString( L"Count: " );
	OutputDebugString( PChar(var_Items->get_ItemBar(-2,TVariant("<*>"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarsCount)) );
	var_Items->DefaultItem = 0;
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,128);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->Bars->Copy(L"Task",L"CountTask")->Color = RGB(0,255,0);
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long hSummary = var_Items->AddItem(TVariant("Project"));
	var_Items->set_ItemBold(hSummary,true);
	long hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task A"));
	var_Items->AddBar(hTask,TVariant("CountTask"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K1"),TNoParam());
	var_Items->AddBar(var_Items->InsertItem(hTask,TNoParam(),TVariant("Task A.1")),TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K11"),TNoParam());
	var_Items->AddBar(var_Items->InsertItem(hTask,TNoParam(),TVariant("Task A.2")),TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K12"),TNoParam());
	hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task B"));
	var_Items->AddBar(hTask,TVariant("CountTask"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K2"),TNoParam());
	hTask = var_Items->InsertItem(hTask,TNoParam(),TVariant("Task B.1"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,9).operator double()),TVariant("K21"),TNoParam());
	var_Items->set_ExpandItem(0,true);
	var_Items->DefaultItem = var_Items->get_ItemByIndex(0);
	OutputDebugString( L"Count: " );
	OutputDebugString( PChar(var_Items->get_ItemBar(-1,TVariant("<*>"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarsCount)) );
	var_Items->DefaultItem = 0;
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,128);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long hSummary = var_Items->AddItem(TVariant("Summary"));
	var_Items->AddBar(hSummary,TVariant("Summary"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,2).operator double()),TVariant(""),TNoParam());
	long hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task A"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K1"),TNoParam());
	hTask = var_Items->InsertItem(hTask,TNoParam(),TVariant("Task A.1"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K11"),TNoParam());
	hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task B"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K2"),TNoParam());
	hTask = var_Items->InsertItem(hTask,TNoParam(),TVariant("Task B.1"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,9).operator double()),TVariant("K21"),TNoParam());
	var_Items->DefineSummaryBars(hSummary,TVariant(""),-3,TVariant("<K*>"));
	var_Items->set_ExpandItem(0,true);
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,128);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long hSummary = var_Items->AddItem(TVariant("Summary"));
	var_Items->AddBar(hSummary,TVariant("Summary"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,2).operator double()),TVariant(""),TNoParam());
	long hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task A"));
	var_Items->AddBar(hTask,TVariant("1Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K1"),TNoParam());
	hTask = var_Items->InsertItem(hTask,TNoParam(),TVariant("Task A.1"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K11"),TNoParam());
	hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task B"));
	var_Items->AddBar(hTask,TVariant("1Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K2"),TNoParam());
	hTask = var_Items->InsertItem(hTask,TNoParam(),TVariant("Task B.1"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,9).operator double()),TVariant("K21"),TNoParam());
	var_Items->DefineSummaryBars(hSummary,TVariant(""),-2,TVariant("<K*>"));
	var_Items->set_ExpandItem(0,true);
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,128);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long hSummary = var_Items->AddItem(TVariant("Summary"));
	var_Items->AddBar(hSummary,TVariant("Summary"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,2).operator double()),TVariant(""),TNoParam());
	long hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task A"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K1"),TNoParam());
	hTask = var_Items->InsertItem(hSummary,TNoParam(),TVariant("Task B"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,4).operator double()),TVariant(TDateTime(2001,1,8).operator double()),TVariant("K2"),TNoParam());
	var_Items->set_ExpandItem(hSummary,true);
	var_Items->DefineSummaryBars(hSummary,TVariant(""),-1,TVariant("<*>"));
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,128);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long hSummary = var_Items->AddItem(TVariant("Summary"));
	var_Items->AddBar(hSummary,TVariant("Summary"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,2).operator double()),TVariant("summary"),TNoParam());
	var_Items->AddBar(var_Items->AddItem(TVariant("Task A")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K1"),TNoParam());
	var_Items->AddBar(var_Items->AddItem(TVariant("Task B")),TVariant("Task"),TVariant(TDateTime(2001,1,6).operator double()),TVariant(TDateTime(2001,1,9).operator double()),TVariant("K2"),TNoParam());
	var_Items->AddBar(var_Items->AddItem(TVariant("Task C")),TVariant("Task"),TVariant(TDateTime(2001,1,11).operator double()),TVariant(TDateTime(2001,1,14).operator double()),TVariant("K3"),TNoParam());
	var_Items->DefineSummaryBars(hSummary,TVariant("summary"),0,TVariant("<K*>"));
G2antt1->EndUpdate();

// DblClick event - Occurs when the user dblclk the left mouse button over an object.
void __fastcall TForm1::G2antt1DblClick(TObject *Sender,short   Shift,int   X,int   Y)
{
	Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
		long h = var_Items->get_CellChecked(1234);
		var_Items->set_CellHasCheckBox(TVariant(0),TVariant(h),true);
		var_Items->set_CellState(TVariant(0),TVariant(h),0);
		var_Items->set_CellHasCheckBox(TVariant(0),TVariant(h),false);
}

// SelectionChanged event - Fired after a new item has been selected.
void __fastcall TForm1::G2antt1SelectionChanged(TObject *Sender)
{
	Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
		var_Items->set_CellState(TVariant(var_Items->FocusItem),TVariant(0),1);
}

G2antt1->MarkSearchColumn = false;
G2antt1->SelBackColor = RGB(255,255,128);
G2antt1->SelForeColor = RGB(0,0,0);
G2antt1->Columns->Add(L"Default");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("Radio 1"));
	var_Items->set_CellHasRadioButton(TVariant(h),TVariant(0),true);
	var_Items->set_CellRadioGroup(TVariant(h),TVariant(0),1234);
	h = var_Items->AddItem(TVariant("Radio 2"));
	var_Items->set_CellHasRadioButton(TVariant(h),TVariant(0),true);
	var_Items->set_CellRadioGroup(TVariant(h),TVariant(0),1234);
	var_Items->set_CellState(TVariant(h),TVariant(0),1);
	h = var_Items->AddItem(TVariant("Radio 3"));
	var_Items->set_CellHasRadioButton(TVariant(h),TVariant(0),true);
	var_Items->set_CellRadioGroup(TVariant(h),TVariant(0),1234);

G2antt1->BeginUpdate();
G2antt1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
G2antt1->TreeColumnIndex = -1;
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exAllLines;
G2antt1->HeaderHeight = 24;
G2antt1->DefaultItemHeight = 24;
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Image");
	var_Column->AllowSizing = false;
	var_Column->Width = 32;
	var_Column->HTMLCaption = L"<img>1</img>";
	var_Column->HeaderAlignment = Exg2anttlib_tlb::AlignmentEnum::CenterAlignment;
	var_Column->Alignment = Exg2anttlib_tlb::AlignmentEnum::CenterAlignment;
	var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueFormat,TVariant(1));
G2antt1->Columns->Add(L"Rest");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddItem(TVariant("<img>1</img>"));
	var_Items->AddItem(TVariant("<img>2</img>"));
	var_Items->AddItem(TVariant("<img>3</img>"));
G2antt1->EndUpdate();

// BarResize event - Occurs when a bar is moved or resized.
void __fastcall TForm1::G2antt1BarResize(TObject *Sender,Exg2anttlib_tlb::HITEM   Item,Variant   Key)
{
	G2antt1->Refresh();
}

G2antt1->BeginUpdate();
G2antt1->DefaultItemHeight = 22;
G2antt1->Columns->Add(L"InterectBars");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,48);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	Exg2anttlib_tlb::IBarPtr var_Bar = var_Chart->Bars->get_Item(TVariant("Task"));
		var_Bar->OverlaidType = Exg2anttlib_tlb::OverlaidBarsTypeEnum::exOverlaidBarsIntersect;
		var_Bar->set_Overlaid(Exg2anttlib_tlb::OverlaidBarsTypeEnum::exOverlaidBarsIntersect,TVariant("ERROR"));
	Exg2anttlib_tlb::IBarPtr var_Bar1 = var_Chart->Bars->Add(L"ERROR");
		var_Bar1->Color = RGB(255,0,0);
		var_Bar1->Pattern = Exg2anttlib_tlb::PatternEnum::exPatternSolid;
		var_Bar1->Height = 7;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant(""));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("A"),TVariant("A"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("B"),TVariant("B"));
	var_Items->set_CellValue(TVariant(h),TVariant(0),TVariant(var_Items->get_IntersectBars(h,TVariant("A"),h,TVariant("B"))));
	h = var_Items->AddItem(TVariant(""));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,6).operator double()),TVariant(TDateTime(2001,1,9).operator double()),TVariant("A"),TVariant("A"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,10).operator double()),TVariant(TDateTime(2001,1,13).operator double()),TVariant("B"),TVariant("B"));
	var_Items->set_CellValue(TVariant(h),TVariant(0),TVariant(var_Items->get_IntersectBars(h,TVariant("A"),h,TVariant("B"))));
	h = var_Items->AddItem(TVariant(""));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,6).operator double()),TVariant(TDateTime(2001,1,9).operator double()),TVariant("B"),TVariant("B"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,10).operator double()),TVariant(TDateTime(2001,1,13).operator double()),TVariant("A"),TVariant("A"));
	var_Items->set_CellValue(TVariant(h),TVariant(0),TVariant(var_Items->get_IntersectBars(h,TVariant("A"),h,TVariant("B"))));
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->HeaderHeight = 32;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"ID");
		var_Column->HTMLCaption = L"<font ;16>ID";
		var_Column->Width = 32;
		var_Column->AllowSizing = false;
	var_Columns->Add(L"Task")->HTMLCaption = L"<font ;16>Task";
G2antt1->FocusColumnIndex = 1;
G2antt1->ShowFocusRect = false;
G2antt1->Chart->set_PaneWidth(true,0);
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant(1))),TVariant(1),TVariant("Task A"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant(2))),TVariant(1),TVariant("Task B"));
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"ID");
		var_Column->FormatColumn = L"1 index ''";
		var_Column->Width = 32;
		var_Column->AllowSizing = false;
	var_Columns->Add(L"Task")->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::EditType;
G2antt1->FocusColumnIndex = 1;
G2antt1->ShowFocusRect = false;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,128);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->AllowCreateBar = Exg2anttlib_tlb::CreateBarEnum::exCreateBarAuto;
G2antt1->Template = L"Chart.Bars(\"Task\"){Def(3) = \"<%=%C1%>\";Def(4)=18}";
G2antt1->EndUpdate();

G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,128);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long hSummary = var_Items->AddItem(TVariant("Summary"));
	var_Items->AddBar(hSummary,TVariant("Summary"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,2).operator double()),TNoParam(),TNoParam());
	long hTask = var_Items->AddItem(TVariant("Task A"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TNoParam(),TNoParam());
	var_Items->DefineSummaryBars(hSummary,TVariant(""),hTask,TVariant(""));
	hTask = var_Items->AddItem(TVariant("Task B"));
	var_Items->AddBar(hTask,TVariant("Task"),TVariant(TDateTime(2001,1,4).operator double()),TVariant(TDateTime(2001,1,8).operator double()),TNoParam(),TNoParam());
	var_Items->DefineSummaryBars(hSummary,TVariant(""),hTask,TVariant(""));

G2antt1->BeginUpdate();
G2antt1->DefaultItemHeight = 24;
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exAllLines;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exAllLines;
	var_Chart->NonworkingDays = 0;
	var_Chart->set_PaneWidth(false,128);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->Bars->get_Item(TVariant("Task"))->Pattern = Exg2anttlib_tlb::PatternEnum::exPatternSolid;
G2antt1->Columns->Add(L"Column");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("Solid A"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("A"),TNoParam());
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("B"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("B"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarColor,TVariant(255));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant("C"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("C"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarColor,TVariant(65280));
	h = var_Items->AddItem(TVariant("Solid B"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("A"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("A"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarBackColor,TVariant(255));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("B"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("B"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarColor,TVariant(255));
	var_Items->set_ItemBar(h,TVariant("B"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarBackColor,TVariant(65280));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant("C"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("C"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarColor,TVariant(16711680));
	var_Items->set_ItemBar(h,TVariant("C"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarBackColor,TVariant(16711935));
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IAppearancePtr var_Appearance = G2antt1->VisualAppearance;
	var_Appearance->Add(1,TVariant(String("gBFLBCJwBAEHhEJAEGg4BNUMQAAYAQGKIYBkAKBQAGaAoDDMOQ4QwAAxDCKsEwsACEIrjKCRShyCYZRhGcTALD8EhhECTZKkAYQEiKLoaRzAcwyDAcQRFCKUJxhEYZa") +
"i+NobSBQMZqBQgASIUCLZ5ACSYEigAovTULCKwJiWNZDUTRcTxCKQahLLivIhGUYKfgmY5lT5VUT1HS9IShJSmKTlORLOi+M4zUJLc4SVblGz7FyfYDBKygLqqFigLAx" +
"dDYTRNfzjHiTKbtGA7MADA4DVTAeC2bC+EYVTytY4sHQrIACZ5iWREMhXTi0E4rTa6dTxaS6KzKGqsZbsNAbHLdHTfVy1Mx1XaobqDJZdaTpdjaTDeJSjVjKdx4TZqSi" +
"zjSGJOgcU4RhcIQDDURhIESXwEGgbQJBQQjeggQBiC4NJAluGJrAUB5Lmmc56n4Pp/i+NQjmqdQ5k2J5+AGAAgCgFgEgAHxQAGfoBmAOA2AaAxghgLgOgMIJ4AoER8mE" +
"WBSBoNohHKAgZgSYgIHYH4ImCB5OAqBghjiEgcgmIQoioD4IiKGJGCsUgUHiVirmOBQVAEgI="));
	var_Appearance->Add(39,TVariant("CP:1 -1 -1 0 0"));
	var_Appearance->Add(40,TVariant(String("gBFLBCJwBAEHhEJAEGg4BEcMQAAYAQGKIYBkAKBQAGaAoDDMOQ4QwAAxDCKsEwsACEIrjKCRShyCYZRhGcTAFD8EhhECTZKkAZwEiKLoaRzAcwyDAcQRFCKUJxlKa5P") +
"jaLwAAbJMZKAqDDgBIijIqnKA5JoyKIkTzCIJxXScByDGqNaQoehYXhEMg1CTXVgRCKoYTDBKybLqGT6VoCP5vWJaURWHZFTTJOyNagmSJ6XACbQMW7gNYQGBEEigNIx" +
"ToOU4jFDGIB2VAQRK5BDQbQSFCpIRCCRQYhcQJ6YIAD76HomS5NU7UNKhHSdMy3J6ra5sOqbBqWa5LWjbNq3DadSzvPKub5vexwHwWawSUDkOR5Li+M43S4JPS5bZdDx" +
"PiWVJrnWOw9F6XxTiGWpsHcO5+C6Xx7kOZpwHoOxeF8T4fkeYJgnEdZwOwQRBnSex9H6f4vk+c5xn4fZQhQBCAg=="));
	var_Appearance->Add(41,TVariant(String("gBFLBCJwBAEHhEJAEGg4BQICg6AADACAxRDAMkOQAGaAoDDUMQyQwAAxDSK8EwsACEIrjKCRShyCYZRhGcTALBMIwKGABIRGUZJGDkOYgDCBEhTHDUOwHGyQYDkCQoR") +
"iYMAwTBQMaTXDdCQ1ECkJomObqAgkMZCTbKMySAA0NgPD6sKSjOIRSDUJZcV5EoAKfiqZIRSJSMZVLLVNSVJipAAlOTZPo6JJuTLOE4WVRcSydH6oAApeg6KoYAFzQAE" +
"DCbYgOTKBYLUOCwTZmDwTK6BcTtXDbejeYYcZ7DNj2NYtJ4TRCBcpzLLIXrCKg0TBPQ4YNC2DT5VDWIq1aDdQo7MpxWjlGI5Ri2c51UDSYi0G4tDyLSYWXDfFSQTrHDQ" +
"XhAAghCUAxJgyaB1DkGRyDCKBhAiGwLg0DYhCKDI8CcVwIAwRotBeAYCCmBZ0nsfR+n+L5PlYE53BwTpzn4AIAiAGAOAMfZfmeVBwDuD54C4DYDCCaA6AgQJfHGPJtD+" +
"YRoGIF4GGGrAAH2RpjjCf4IGIOIKCSCQhmeXBtDqT54i4LYLCKaI6CkfRGlOKgtg2IxYl4OoMkwIYwmkP5jmkAg/hAZAYnAaw6A+eQeEmEgkikKg8BqDkYFCFIlBkThT" +
"g8BoThif4WGWORqFyFwjkGIJlD+ZgphIY4ZGYWYEmSGQmjGIhthvMpwGcOJPnmTh1h0JxploPAZg4I5+HyH4nlmfh/g8BhTgSf4hGgegagiIlShCYA/miahCg+JBpUIY" +
"w3k+ehehmJgpioaoWDeKYagAY4oioSZFn2BQfFGCJdD+aoqjKK4rGqWJwGENwPnqTo1i1gtiBgDYzn6PIviuWp+j+DwFnMaJ/jEbB7BqSIyCOQR4lkP5smsQpPjQbQbD" +
"SWI0C0cR6lmNpqGMCgJDCBZTFyf44G4O4KmSOWTnCVg/m6K4ymuOxu4OWw1E+e5OnWPQvGvYgWg0Q5+nyP4vlvE+OBMTJ/kEcB8BsCJCDATArA6QhxAgeIgkScRMFcFp" +
"FlCFAEICA"));
	var_Appearance->Add(42,TVariant(String("gBFLBCJwBAEHhEJAEGg4BY8MQAAYAQGKIYBkAKBQAGaAoDDMOQ4QwAAwjQLMEwsACEIrjKCRShyCYZRhGcTALD8EhhECTZKkAYgEiKLoaRzAcwyDAcQRFCKUJxhEY5a") +
"i+NobRCAUiwHQUBr/I4AKLfeJ5dACKYNShRMrSABMNgZBKpJAqKiqJoiFoRDINIi2BYUIhqGCxYRseyZegmEYWVTREr3HKsVTtAanjZSJakXxnGaQJ7jKaLXo6II8YTI" +
"WBABaIAQiBahQArOiKchaTZ5YheFRYVBOG4bK6BcguW4qGxSXpuRxZOo2YAFVzNNC3YzkCIcegnIp9ZxeFK5Tg1Z4XKTaNwqPBcYpHPqdVhCOgYZwUb5XMjWNatLYIbo" +
"ziiUhzCAeJeG6ZAAAiBIUA0JgziGVJkGUGJIBgUYSBEN5VBoGxCEUHItjSFAxBcRhim4dIqFGTB+BUfxfneegAgCYAoBQFR+lQeASAEBRIGESAogMYJ4DoEIEmCaAqAo" +
"JoGGCbgYgaIYYG4HoHGICByCKAoKmGZBOgkYh4hoKIKmKKI2CmC5giMBINBgY0AjODRjgiXg6g2I8glUKAHEifhBhAJApBYRIRmQOQmAoOgLBIEhMhOJJZD4UoUGUSRC" +
"FaAoOHKPIAhYZY5GoXIXmWaYGF2GJlgKMB9DmZhpiIZ4aGaSYuG6GomigWgGDmCohmYdIdicWZeHqHRnCgHgIh8aAIBoCA/lAECAg"));
G2antt1->Appearance = Exg2anttlib_tlb::AppearanceEnum(0x28000000);
G2antt1->BackColor = RGB(255,255,255);
G2antt1->BackColorLevelHeader = RGB(255,255,255);
G2antt1->BackColorHeader = 0x27000000;
G2antt1->SelBackColor = RGB(0,0,0);
G2antt1->SelForeColor = RGB(255,255,255);
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->BackColorLevelHeader = 0x27000000;
	var_Chart->BackColor = RGB(255,255,255);
	var_Chart->Bars->get_Item(TVariant("Task"))->Color = 0x2a000000;
G2antt1->FilterBarBackColor = 0x1000000;
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exCursorHoverColumn] = 0x29000000;
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exToolTipAppearance] = 0x1000000;
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exSplitBar] = 0x1000000;
G2antt1->EndUpdate();

G2antt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exHeaderFilterBarButton] = 0x1000000;
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exSplitBar] = 0x1ff0000;

Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->set_PaneWidth(false,64);
G2antt1->Columns->Add(L"Column");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("Item 1"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant(""),TNoParam());
	var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarCaption,TVariant("<sha ;;0>Event <b><font ;6><off -6>2<off 4>3<off 4>1"));
	var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarHAlignCaption,TVariant(18));

G2antt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	var_Columns->Add(L"Column 1");
	var_Columns->Add(L"Column 2");
G2antt1->BackColorHeader = 0x1000000;
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exCursorHoverColumn] = 0x12d86ff;

G2antt1->ColumnAutoResize = false;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	var_Columns->Add(L"Column 1");
	var_Columns->Add(L"Column 2")->Visible = false;
G2antt1->VisualAppearance->Add(2,TVariant("c:\\exontrol\\images\\normal.ebn"));
G2antt1->VisualAppearance->Add(3,TVariant("c:\\exontrol\\images\\pushed.ebn"));
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exColumnsFloatAppearance] = 0x2000000;
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exColumnsFloatBackColor] = 0x3000000;
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exColumnsFloatCaptionBackColor] = RGB(246,245,240);
G2antt1->ColumnsFloatBarVisible = Exg2anttlib_tlb::ColumnsFloatBarVisibleEnum::exColumnsFloatBarVisibleIncludeHiddenColumns;

G2antt1->ColumnAutoResize = false;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	var_Columns->Add(L"Column 1");
	var_Columns->Add(L"Column 2")->Visible = false;
G2antt1->VisualAppearance->Add(3,TVariant("c:\\exontrol\\images\\pushed.ebn"));
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exColumnsFloatBackColor] = 0x3000000;
G2antt1->ColumnsFloatBarVisible = Exg2anttlib_tlb::ColumnsFloatBarVisibleEnum::exColumnsFloatBarVisibleIncludeHiddenColumns;

G2antt1->VisualAppearance->Add(2,TVariant("c:\\exontrol\\images\\normal.ebn"));
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exColumnsFloatAppearance] = 0x2000000;
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exColumnsFloatBackColor] = RGB(246,245,240);
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exColumnsFloatCaptionBackColor] = RGB(246,245,240);
G2antt1->ColumnsFloatBarVisible = Exg2anttlib_tlb::ColumnsFloatBarVisibleEnum::exColumnsFloatBarVisibleIncludeHiddenColumns;

G2antt1->ColumnAutoResize = false;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	var_Columns->Add(L"Column 1");
	var_Columns->Add(L"Column 2")->Visible = false;
G2antt1->ColumnsFloatBarVisible = Exg2anttlib_tlb::ColumnsFloatBarVisibleEnum::exColumnsFloatBarVisibleIncludeHiddenColumns;

G2antt1->ColumnAutoResize = false;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	var_Columns->Add(L"Column 1");
	var_Columns->Add(L"Column 2")->Visible = false;
	Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Column 3");
		var_Column->Visible = false;
		var_Column->Enabled = false;
G2antt1->ColumnsFloatBarVisible = Exg2anttlib_tlb::ColumnsFloatBarVisibleEnum::exColumnsFloatBarVisibleIncludeHiddenColumns;

G2antt1->ColumnAutoResize = false;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	var_Columns->Add(L"Column 1");
	var_Columns->Add(L"Column 2")->Visible = false;
	Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Column 3");
		var_Column->Visible = false;
		var_Column->AllowDragging = false;
G2antt1->ColumnsFloatBarVisible = Exg2anttlib_tlb::ColumnsFloatBarVisibleEnum::exColumnsFloatBarVisibleIncludeHiddenColumns;

G2antt1->ColumnAutoResize = false;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	var_Columns->Add(L"Column 1");
	var_Columns->Add(L"Column 2")->Visible = false;
G2antt1->Description[Exg2anttlib_tlb::DescriptionTypeEnum::exColumnsFloatBar] = L"Hidden Columns";
G2antt1->ColumnsFloatBarVisible = Exg2anttlib_tlb::ColumnsFloatBarVisibleEnum::exColumnsFloatBarVisibleIncludeHiddenColumns;

G2antt1->ColumnAutoResize = false;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	var_Columns->Add(L"Column 1");
	var_Columns->Add(L"Column 2")->Visible = false;
G2antt1->ColumnsFloatBarVisible = Exg2anttlib_tlb::ColumnsFloatBarVisibleEnum::exColumnsFloatBarVisibleIncludeHiddenColumns;

Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	var_Columns->Add(L"Column 1");
	var_Columns->Add(L"Column 2");
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exCursorHoverColumn] = -1;

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Column");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddItem(TVariant("Item 1"));
	var_Items->AddItem(TVariant("Item 2"));
	var_Items->AddItem(TVariant("Item 3"));
G2antt1->Layout = L"Select=\"0\";SingleSort=\"C0:2\";Columns=1";
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Column");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddItem(TVariant("Item 1"));
	var_Items->AddItem(TVariant("Item 2"));
	var_Items->AddItem(TVariant("Item 3"));
G2antt1->Layout = TVariant(String("gBjAAwAAuABmABpABsAB0ABlAByhoAPIAOEPAA9gYABoABQAgUEg0XN4AOcJicKkpujMbjsfkMFk0YhkQgUOjUEl8gjcGO0ok8KMULjEaGMcj08kQAO8oMkTNEtGwAG") +
"QAqc7gUlhh1ABtAEsk9GpEfhElgVcsMupNlnlonlaAFcr0shUsp8QPEtnVJqJhmcIhUMh0QiU5sYAqMngUSuEMw07k8Qv0SgVRrNEuVflF2jF5x9JyNEm0TjQijemyE0" +
"jE3t+YruauoAu4Az1qj9BzRn0UzksSnAA0xDjY6qnAw8OiUQ0dwzN0zWz2t7j8/xURAGNvWH6k8xlEhklhEI0O/6QAgI=");
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->ColumnAutoResize = false;
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exAllLines;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"C0");
		var_Column->ExpandColumns = L"1,2";
		var_Column->DisplayExpandButton = false;
	var_Columns->Add(L"C1");
	var_Columns->Add(L"C2");
	var_Columns->Add(L"C3");
	Exg2anttlib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"C4");
		var_Column1->ExpandColumns = L"5,6";
		var_Column1->DisplayExpandButton = false;
	var_Columns->Add(L"C5");
	Exg2anttlib_tlb::IColumnPtr var_Column2 = var_Columns->Add(L"C6");
		var_Column2->ExpandColumns = L"6,7";
		var_Column2->DisplayExpandButton = false;
	var_Columns->Add(L"C7");
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exAllLines;
G2antt1->BackColorLevelHeader = RGB(240,240,240);
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Photo");
		var_Column->AllowSizing = false;
		var_Column->Width = 32;
	var_Columns->Add(L"Personal Info");
	var_Columns->Add(L"Title");
	var_Columns->Add(L"Name");
	var_Columns->Add(L"First");
	var_Columns->Add(L"Last");
	var_Columns->Add(L"Address");
	var_Columns->get_Item(TVariant("Personal Info"))->ExpandColumns = L"2,3";
	Exg2anttlib_tlb::IColumnPtr var_Column1 = var_Columns->get_Item(TVariant("Name"));
		var_Column1->ExpandColumns = L"4,5";
		var_Column1->Expanded = false;
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,128);
	var_Chart->AllowCreateBar = Exg2anttlib_tlb::CreateBarEnum::exCreateBarAuto;
	var_Chart->UnitWidth = 50;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2013,1,1).operator double()));
	var_Chart->LevelCount = 2;
	var_Chart->get_Level(0)->set_Label(TVariant(4096));
	var_Chart->get_Level(1)->set_Label(TVariant("<%h%>:<%nn%>"));
	var_Chart->get_Level(1)->Unit = Exg2anttlib_tlb::UnitEnum::exMinute;
	var_Chart->get_Level(1)->Count = 60;
	var_Chart->ResizeUnitScale = Exg2anttlib_tlb::UnitEnum::exMinute;
	var_Chart->ResizeUnitCount = 15;
	var_Chart->AllowInsideZoom = true;
	Exg2anttlib_tlb::IInsideZoomFormatPtr var_InsideZoomFormat = var_Chart->DefaultInsideZoomFormat;
		var_InsideZoomFormat->InsideCount = 5;
		var_InsideZoomFormat->InsideUnit = Exg2anttlib_tlb::UnitEnum::exMinute;
		var_InsideZoomFormat->InsideLabel = L"<%nn%>";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddItem(TVariant("Item"));
G2antt1->EndUpdate();

G2antt1->Chart->set_PaneWidth(true,0);
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	var_Columns->Add(L"Default");
	Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Format.1");
		var_Column->ComputedField = L"%0";
		var_Column->FormatColumn = L"dateF(value) replace `/` with `-`";
	Exg2anttlib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"Format.2");
		var_Column1->ComputedField = L"%0";
		var_Column1->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueFormat,TVariant(1));
		var_Column1->FormatColumn = L"`<b>`+ shortdate(value) + `</b> ` + timeF(value)";
	Exg2anttlib_tlb::IColumnPtr var_Column2 = var_Columns->Add(L"Format.3");
		var_Column2->ComputedField = L"%0";
		var_Column2->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueFormat,TVariant(1));
		var_Column2->FormatColumn = TVariant(String("` <b>`+ ( weekday(value) case ( 0 : `Su`; 1 : `Mo`; 2 : `Tu`; 3 : `We`; 4 : `Th`; 5 : `Fr`; 6 : `Sa`) ) + `</b> ` + ( dateF(val") +
"ue) replace `/` with `-` )");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddItem(TVariant(TDateTime(2001,1,1,10,00,00,0).operator double()));
	var_Items->AddItem(TVariant(TDateTime(2001,1,2,10,00,00,0).operator double()));

G2antt1->BeginUpdate();
G2antt1->AntiAliasing = true;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2000,12,26).operator double()));
	var_Chart->set_PaneWidth(false,128);
G2antt1->Columns->Add(L"Column");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h1 = var_Items->AddItem(TVariant("Item 1"));
	var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("A"),TNoParam());
	var_Items->set_ItemBar(h1,TVariant("A"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarCaption,TVariant("text"));
	h1 = var_Items->AddItem(TVariant("Item 2"));
	var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("A"),TNoParam());
	var_Items->set_ItemBar(h1,TVariant("A"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarCaption,TVariant("text outside associated with a bar"));
	var_Items->set_ItemBar(h1,TVariant("A"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarHAlignCaption,TVariant(18));
	h1 = var_Items->AddItem(TVariant("Item 3"));
	var_Items->AddBar(h1,TVariant(""),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,2).operator double()),TVariant("A"),TNoParam());
	var_Items->set_ItemBar(h1,TVariant("A"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarCaption,TVariant("text with no bar associated"));
	h1 = var_Items->AddItem(TVariant("Item 4"));
	var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("A"),TNoParam());
	h1 = var_Items->AddItem(TVariant("Item 5"));
	h1 = var_Items->AddItem(TVariant("Item 6"));
	h1 = var_Items->AddItem(TVariant("Item 7"));
	h1 = var_Items->AddItem(TVariant("Item 8"));
	var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("A"),TNoParam());
	h1 = var_Items->AddItem(TVariant("Item 8"));
	var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,6).operator double()),TVariant("A"),TNoParam());
Exg2anttlib_tlb::INotesPtr var_Notes = G2antt1->Chart->Notes;
	var_Notes->Add(TVariant("1S"),TVariant(G2antt1->Items->get_ItemByIndex(3)),TVariant("A"),L"<font ;6>Movable Note Inside the Bar")->set_PartCanMove(Exg2anttlib_tlb::NotePartEnum::exNoteStart,true);
	var_Notes->Add(TVariant("AK"),TVariant(G2antt1->Items->get_ItemByIndex(6)),TVariant(TDateTime(2001,1,6).operator double()),L"Note associated with a date: <%mm%>/<%dd%>/<%yyyy%>");
	Exg2anttlib_tlb::INotePtr var_Note = var_Notes->Add(TVariant("2S"),TVariant(G2antt1->Items->get_ItemByIndex(7)),TVariant("A"),L"<font ;6>Fixed Note Left");
		var_Note->ShowLink = Exg2anttlib_tlb::NoteLinkTypeEnum::exNoteLinkHidden;
		var_Note->set_PartVOffset(Exg2anttlib_tlb::NotePartEnum::exNoteEnd,0);
		var_Note->set_PartHOffset(Exg2anttlib_tlb::NotePartEnum::exNoteStart,-32);
		var_Note->set_PartShadow(Exg2anttlib_tlb::NotePartEnum::exNoteEnd,false);
		var_Note->set_PartBackColor(Exg2anttlib_tlb::NotePartEnum::exNoteEnd,RGB(255,255,0));
	Exg2anttlib_tlb::INotePtr var_Note1 = var_Notes->Add(TVariant("3S"),TVariant(G2antt1->Items->get_ItemByIndex(8)),TVariant("A"),L"Start<br><%mmm%> <%d%> <%yyyy%>");
		var_Note1->set_PartCanMove(Exg2anttlib_tlb::NotePartEnum::exNoteEnd,true);
		var_Note1->set_PartHOffset(Exg2anttlib_tlb::NotePartEnum::exNoteEnd,-64);
		var_Note1->LinkStyle = Exg2anttlib_tlb::LinkStyleEnum::exLinkDot;
		var_Note1->LinkWidth = 2;
		var_Note1->LinkColor = RGB(0,0,255);
	Exg2anttlib_tlb::INotePtr var_Note2 = var_Notes->Add(TVariant("3F"),TVariant(G2antt1->Items->get_ItemByIndex(8)),TVariant("A"),L"End<br><%mmm%> <%d%> <%yyyy%>");
		var_Note2->set_RelativePosition(TVariant(1));
		var_Note2->set_PartCanMove(Exg2anttlib_tlb::NotePartEnum::exNoteEnd,true);
		var_Note2->LinkStyle = Exg2anttlib_tlb::LinkStyleEnum::exLinkDot;
		var_Note2->LinkWidth = 2;
		var_Note2->LinkColor = RGB(0,0,255);
G2antt1->EndUpdate();

G2antt1->Debug = true;
G2antt1->Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
G2antt1->Columns->Add(L"Column");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h1 = var_Items->AddItem(TVariant("Item 1"));
	var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("A"),TNoParam());
	long h2 = var_Items->AddItem(TVariant("Item 2"));
	var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("B"),TNoParam());
	long h3 = var_Items->AddItem(TVariant("Item 3"));
	var_Items->AddBar(h3,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("A"),TNoParam());
	var_Items->set_ItemBar(h3,TVariant("A"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarParent,TVariant(h1));
	OutputDebugString( L"The Bar A of H3 fails to change the parent to H1 as it has already a bar named A" );
	var_Items->set_ItemBar(h3,TVariant("A"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarParent,TVariant(h2));
	OutputDebugString( L"The Bar A of H3 can be moved to H2, as it contains no bars with the key A" );

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IAppearancePtr var_Appearance = G2antt1->VisualAppearance;
	var_Appearance->Add(1,TVariant(String("gBFLBCJwBAEHhEJAEGg4BS4Dg6AADACAxRDAMgBQKAAzQFAYbBmGaGAAGIZhQgmFgAQhFcZQSKUOQTDKMIziYBYfgkMIgSbJUgDKAkRRdDSOYDmGQYDiCIoRShOMIjR") +
"LUXxtDYEIRkSZYJAKCTtBwJAAURRULR6ACUYDnSRqGj6CQKRqEVBSLAdKyXJKvaZhGIRSDUJZkWZEIyjBY8EzXNqrIDoGKqYgOQ4XV5TFgxPR9IyhEAaLrleT5TjOII/" +
"RpOEpYXSVHxFRAAAYhG4wABCXAAXjYF5Udhlfx3FCvMbqeCcSgOWoDZZRFa0PjVQQtNC4IitGzrMqrNaDSBlGigBauKw3TKlMzye7repOA5+aJGVz7VgfGz7EDjKg0GJ" +
"cgMex3lOZB5jgPYHHMaYxjeRBilWbZNG4B49l2do6hkfIhECUhjDoHROEYUYMgEbQMCEEx+lGIY0CQUQJHYGoUgQGBFkgB4FmkOINiMbBrAwQoxngSQMCCYJAG8DYCkM" +
"ZJNDOAhAHCbYGGGOBqByB5hiMcJSDORhwjQKoEkKSIgHoEZEDgWJOECSwyGSGwjkWUJUh8HADiiXA6CSRgQliFwcgcSICB2EJkCKDIAB4CAxDgMoOiOIkfA4CoiDCDhA" +
"mUEg4hEF4DHKCByA8JYpHIWwbAMIIuC6EIkCiOBwA2QpSHQbgOkoIZMD2GxmnmOhVhUJQiEwYAOAoQZQD6HhnjmaIfBuQ5BlQPQLiMEhuEKIRHmEKA7h+Q5ChQdQPmia" +
"hCg+JBnDAAhVCVPpoicHYEAobodicKZqHqGAO0YNA0ikQxKg6IYnAqAZcEGKxqnqOowiUZRSFwYwPAqIZkEOLhrjqaIqB4BAqn6QYwCwKwWkSMZECKLo6jKBA7DKTItW" +
"EZBlA8SpRmwRY1G0exYi0HoEEsbpdjcLZrgaYI4kQQo6laOYEFuIpojQCJiHAZgPksAZ0EePBvDuSp0j2bxrmadY+m8QpGnKP4EHwAwAjsCZxiQQQtAgAQrAiQowhKUB" +
"/BIcJsEMD5EHETBPBYEhLFwJwZBKMY8G6bAoEaIQMjcIIEkzUZJAscgEEuShyjyKwskucpskQSwuDITJQEyTYzGuMIjBsBBCmiBATjObQDD+UB0E0DxGlCNINASO5PnS" +
"MQ7E2Uxu3CbQRguUgYFCVR1H0WxYC2R5xDSDgVWiXA8AyNggksXwPDWQQ3FgL4IHERxsluNpdj6bAqAacQckAEQBQWxfDzF4BUYYqBKhEEQNMDgPQGhFGIDgVwKR3iiC" +
"iIIIgig+BfA2MYOLtAqA4ESCYDIFgVDyGEKkPAQgFBDDwG4DYnQzg5GiDIOAZw3hCDoA8MQIA9PeGEHkRIyx6jiOMEoTAxRMhoCeIwUQKSbCKH6NgV43AECyFeEkEQdB" +
"TAxC0FESQYhgB+DGPcTwYBXBZEeCIOoKg5j6EIJAbQNxJCjCAMAJwDRxghA4DEBYpk1hnHwH4DIxg3AaFGGgMQFwHhBHgGkewhhCDIHMDkDY0AlAGEAIAgIA="));
	var_Appearance->Add(2,TVariant("c:\\exontrol\\images\\normal.ebn"));
	var_Appearance->Add(3,TVariant("CP:2 2 -4 2 4"));
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,256);
	var_Chart->LevelCount = 2;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
G2antt1->Columns->Add(L"Info");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("Range Moveable Frame"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,4).operator double()),TVariant(TDateTime(2001,1,8).operator double()),TVariant("F"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarToolTip,TVariant("This bar can be moved inside the displayed range."));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarMinStart,TVariant(TDateTime(2001,1,2).operator double()));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarMaxEnd,TVariant(TDateTime(2001,1,18).operator double()));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarShowRange,TVariant(32));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarShowRangeTransparent,TVariant(90));
	h = var_Items->AddItem(TVariant("Range Moveable Pattern"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,6).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant("F"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarToolTip,TVariant("This bar can be moved inside the displayed range."));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarMinStart,TVariant(TDateTime(2001,1,2).operator double()));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarMaxEnd,TVariant(TDateTime(2001,1,18).operator double()));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarShowRange,TVariant(1));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarShowRangeTransparent,TVariant(90));
	h = var_Items->AddItem(TVariant("Range Moveable EBN Transparent"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,12).operator double()),TVariant("F"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarToolTip,TVariant("This bar can be moved inside the displayed range."));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarMinStart,TVariant(TDateTime(2001,1,2).operator double()));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarMaxEnd,TVariant(TDateTime(2001,1,18).operator double()));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarShowRange,TVariant(16777216));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarShowRangeTransparent,TVariant(50));
	h = var_Items->AddItem(TVariant("Range Moveable EBN Opaque 1"));
	var_Items->set_ItemHeight(h,24);
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,10).operator double()),TVariant(TDateTime(2001,1,14).operator double()),TVariant("F"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarToolTip,TVariant("This bar can be moved inside the displayed range."));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarMinStart,TVariant(TDateTime(2001,1,2).operator double()));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarMaxEnd,TVariant(TDateTime(2001,1,18).operator double()));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarShowRange,TVariant(33554432));
	h = var_Items->AddItem(TVariant("Range Moveable EBN Opaque 2"));
	var_Items->set_ItemHeight(h,24);
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,12).operator double()),TVariant(TDateTime(2001,1,16).operator double()),TVariant("F"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarToolTip,TVariant("This bar can be moved inside the displayed range."));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarMinStart,TVariant(TDateTime(2001,1,2).operator double()));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarMaxEnd,TVariant(TDateTime(2001,1,18).operator double()));
	var_Items->set_ItemBar(h,TVariant("F"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarShowRange,TVariant(50331648));
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IAppearancePtr var_Appearance = G2antt1->VisualAppearance;
	var_Appearance->Add(1,TVariant(String("gBFLBCJwBAEHhEJAEGg4BK8IQAAYAQGKIYBkAKBQAGaAoDDYMwzQwAAxDMKEEwsACEIrjKCRShyCYZRhGcTAFD8EhhECTY4lCQJAiKLoeQLHMBybJ8LwiGQaRJmeaYR") +
"DUMI6QjPVARVIkaxhCSSaKpIAIBEB"));
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,0);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
	var_Chart->MarkTodayColor = var_Chart->BackColor;
	var_Chart->LevelCount = 2;
	var_Chart->AllowSelectDate = Exg2anttlib_tlb::SelectDateEnum::exNoSelectDate;
	var_Chart->MarkSelectDateColor = 0x1000000;
	var_Chart->SelectLevel = 1;
	var_Chart->set_SelectDate(TDateTime(2008,1,15).operator double(),true);
	var_Chart->set_SelectDate(TDateTime(2008,1,18).operator double(),true);
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,0);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
	var_Chart->MarkTodayColor = var_Chart->BackColor;
	var_Chart->LevelCount = 2;
	var_Chart->AllowSelectDate = Exg2anttlib_tlb::SelectDateEnum::exNoSelectDate;
	var_Chart->MarkSelectDateColor = 0x7fff0000;
	var_Chart->SelectLevel = 1;
	var_Chart->set_SelectDate(TDateTime(2008,1,15).operator double(),true);
	var_Chart->set_SelectDate(TDateTime(2008,1,18).operator double(),true);
G2antt1->EndUpdate();

// FilterChange event - Occurs when the filter was changed.
void __fastcall TForm1::G2antt1FilterChange(TObject *Sender)
{
	OutputDebugString( L"If negative, the filter is present, else not" );
	OutputDebugString( PChar(G2antt1->Items->VisibleItemCount) );
}

G2antt1->BeginUpdate();
G2antt1->LinesAtRoot = Exg2anttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
G2antt1->TreeColumnIndex = -1;
G2antt1->FilterInclude = Exg2anttlib_tlb::FilterIncludeEnum::exMatchingItemsOnly;
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Column");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterType = Exg2anttlib_tlb::FilterTypeEnum::exFilter;
	var_Column->Filter = L"C1";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("R1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("C1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("C2"));
	var_Items->set_ExpandItem(h,true);
	h = var_Items->AddItem(TVariant("R2"));
	var_Items->InsertItem(h,TNoParam(),TVariant("C1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("C2"));
G2antt1->ApplyFilter();
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->LinesAtRoot = Exg2anttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
G2antt1->TreeColumnIndex = -1;
G2antt1->FilterInclude = Exg2anttlib_tlb::FilterIncludeEnum::exMatchingItemsOnly;
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Column");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterType = Exg2anttlib_tlb::FilterTypeEnum::exFilter;
	var_Column->Filter = L"C1|C2";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("R1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("C1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("C2"));
	var_Items->set_ExpandItem(h,true);
	h = var_Items->AddItem(TVariant("R2"));
	var_Items->InsertItem(h,TNoParam(),TVariant("C1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("C2"));
G2antt1->ApplyFilter();
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->LinesAtRoot = Exg2anttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
G2antt1->FilterInclude = Exg2anttlib_tlb::FilterIncludeEnum::exMatchingItemsOnly;
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Column");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterType = Exg2anttlib_tlb::FilterTypeEnum::exFilter;
	var_Column->Filter = L"C1|C2";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("R1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("C1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("C2"));
	var_Items->set_ExpandItem(h,true);
	h = var_Items->AddItem(TVariant("R2"));
	var_Items->InsertItem(h,TNoParam(),TVariant("C1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("C2"));
G2antt1->ApplyFilter();
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Pattern");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->FirstWeekDay = Exg2anttlib_tlb::WeekDayEnum::exMonday;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,24).operator double()));
	var_Chart->set_PaneWidth(false,52);
	var_Chart->LevelCount = 2;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddItem(TVariant("Default"));
	var_Items->set_ItemNonworkingUnits(var_Items->AddItem(TVariant("1/26/2008")),TVariant(false),L"weekday(value) case (default:0 ; 0:1; 6:(value != #1/26/2008#))");
	var_Items->set_ItemNonworkingUnits(var_Items->AddItem(TVariant("1/27/2008")),TVariant(false),L"weekday(value) case (default:0 ; 0:(value != #1/27/2008#); 6:1)");
	var_Items->set_ItemNonworkingUnits(var_Items->AddItem(TVariant("Sundays")),TVariant(false),L"weekday(value) = 0");
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->ScrollBars = Exg2anttlib_tlb::ScrollBarsEnum::exDisableBoth;
G2antt1->Chart->ToolTip = L"";
G2antt1->ScrollPartVisible[Exg2anttlib_tlb::ScrollBarEnum::exVScroll,Exg2anttlib_tlb::ScrollPartEnum::exExtentThumbPart] = true;
G2antt1->ScrollPartVisible[Exg2anttlib_tlb::ScrollBarEnum::exHScroll,Exg2anttlib_tlb::ScrollPartEnum::exExtentThumbPart] = true;
G2antt1->ScrollPartVisible[Exg2anttlib_tlb::ScrollBarEnum::exHChartScroll,Exg2anttlib_tlb::ScrollPartEnum::exExtentThumbPart] = true;
G2antt1->ScrollWidth = 4;
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exVSBack] = RGB(240,240,240);
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exVSThumb] = RGB(128,128,128);
G2antt1->ScrollHeight = 4;
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exHSBack] = G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exVSBack];
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exHSThumb] = G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exVSThumb];
G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exScrollSizeGrip] = G2antt1->Background[Exg2anttlib_tlb::BackgroundPartEnum::exVSBack];
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IAppearancePtr var_Appearance = G2antt1->VisualAppearance;
	var_Appearance->Add(1,TVariant(String("gBFLBCJwBAEHhEJAEGg4BNACg6AADACAxRDAMgBQKAAzQFAYbhsGCGAAGEZBQgmFgAQhFcZQSKUOQTDKMIziYBYfgkMIgSbJUgDEAkRRdDSOYDmGQYDiCIoRShOMaTV") +
"J8bQ2ASEaAmWK3boUAJFPrFc6ABJMZRRISXJABeKwRoGJYaUhRdDRNCIZBqEqua7iEZRQqCCZkWZPNTRVScByhF61IDpWjKLDKJJwXBMcxyBL0NRxFTAKawGoYbq0AJQ" +
"VTQcZPVhgAYYfSlMDuOB5Gq+G5SQjhWIgBjde4dRrHYrsGyQAp7JJoWLZMQyFIFIYNTS8LgpPI6LyyP5rABhWw5PiUVyfWTMdwzPatbyKHJicbpepWPxcNYtNzcNb3SA" +
"bn+KgAmqP5yDiIAACIEhQDSGJOgcU4RhQYwgFUQwIESXxEGgbQJBQQhzHmUAAGILh0lWbpEGIIQQHuegaAaoRYBUBYBCgFAOAOQJgC4CgCCCQAUAQARACgRZFEa3ogCc" +
"CICDCDZ9AeH5wGgFoHmAUBIA6CJgiALgMAIABYiYER+BuMIyC4CZjAcYgygyYxIlYNoNBGMJGDoCximiXg+g+Yx0G0DgNiOIJGECEZkgQbA7A8A5JA4SITmOZBsEGFJD" +
"kkLhQhXOItBYEZEGEHBCBARApGIYh1EAaIoAMQIEkENBNBGZpJg4YgCGcAAaGUAAFCmVhqBMZppGADQDACQAmAwAAFgoBh1BSJ4ZFwEEdHmcFmgWag2gEFhoFlINYkoH" +
"AQAABhKGQX4jGkGQ8BiJ5BDqBAABqKl1GSJxkgAcoqAYAR3lQcIrkaOoSiiEZCBCBAgiqAaJHaLpHBqQoliaBZxHwWYwkUQRMFQExEmENBJBIRIBAgQwQkOYJ0D4DhDg" +
"CYAzjWQpgjwLgKi2QIWl4CACADeofC4SpsHcHArlqRBqBkbpLAaQoxAUQRQE6PLoCaT40AOYJ6lWNdXlAL4/m2QIql4CRAAQBCAg="));
	var_Appearance->Add(2,TVariant("CP:1 -4 -4 4 4"));
G2antt1->Columns->Add(L"Task");
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exAllLines;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->set_PaneWidth(false,128);
	var_Chart->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exAllLines;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddBar(var_Items->AddItem(TVariant("Task")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K1"),TNoParam());
	long h = var_Items->AddItem(TVariant("Task/ EBN Frame"));
	var_Items->set_ItemHeight(h,32);
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,15).operator double()),TVariant("K2"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("K2"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarFrameColor,TVariant(33554432));
	h = var_Items->AddItem(TVariant("Task/ EBN Frame"));
	var_Items->set_ItemHeight(h,32);
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,15).operator double()),TVariant("K2"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("K2"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarFrameColor,TVariant(50331392));
	var_Items->AddBar(var_Items->AddItem(TVariant("Task")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K3"),TNoParam());
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	var_Columns->Add(L"Tasks");
	Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Duration");
		var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(513));
		var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarKey,TVariant("A"));
	Exg2anttlib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"Working");
		var_Column1->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(258));
		var_Column1->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarKey,TVariant("A"));
G2antt1->Items->AllowCellValueToItemBar = true;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_PaneWidth(false,256);
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2002,1,3).operator double()));
	var_Chart->LevelCount = 2;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("Task 1"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2002,1,4).operator double()),TVariant(TDateTime(2002,1,8).operator double()),TVariant("A"),TNoParam());
G2antt1->EndUpdate();

// BarResize event - Occurs when a bar is moved or resized.
void __fastcall TForm1::G2antt1BarResize(TObject *Sender,Exg2anttlib_tlb::HITEM   Item,Variant   Key)
{
	G2antt1->Refresh();
}

G2antt1->BeginUpdate();
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"<fgcolor=FF0000>Tasks > 2 days");
	var_Column->HTMLCaption = var_Column->Caption;
Exg2anttlib_tlb::IColumnPtr var_Column1 = G2antt1->Columns->Add(L"PropertyBar");
	var_Column1->Visible = false;
	var_Column1->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarKey,TVariant(""));
	var_Column1->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(513));
G2antt1->Items->AllowCellValueToItemBar = true;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->LevelCount = 2;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->set_PaneWidth(false,96);
	var_Chart->NonworkingDays = 0;
Exg2anttlib_tlb::IConditionalFormatPtr var_ConditionalFormat = G2antt1->ConditionalFormats->Add(L"%1 > 2",TNoParam());
	var_ConditionalFormat->ForeColor = RGB(255,0,0);
	var_ConditionalFormat->Bold = true;
G2antt1->SelBackColor = G2antt1->BackColor;
G2antt1->SelForeColor = G2antt1->ForeColor;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant(""),TNoParam());
	var_Items->AddBar(var_Items->AddItem(TVariant("Task 2")),TVariant("Task"),TVariant(TDateTime(2001,1,4).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant(""),TNoParam());
	var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant(""),TNoParam());
G2antt1->EndUpdate();

// BarResize event - Occurs when a bar is moved or resized.
void __fastcall TForm1::G2antt1BarResize(TObject *Sender,Exg2anttlib_tlb::HITEM   Item,Variant   Key)
{
	G2antt1->Items->SchedulePDM(Item,TVariant(Key));
	G2antt1->Refresh();
}

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"PropertyBar");
	var_Column->Visible = false;
	var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarKey,TVariant(""));
	var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(269));
G2antt1->Items->AllowCellValueToItemBar = true;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->set_PaneWidth(false,48);
	var_Chart->NonworkingDays = 0;
Exg2anttlib_tlb::IConditionalFormatPtr var_ConditionalFormat = G2antt1->ConditionalFormats->Add(L"%1 != 0",TNoParam());
	var_ConditionalFormat->ForeColor = RGB(255,0,0);
	var_ConditionalFormat->Bold = true;
G2antt1->SelBackColor = G2antt1->BackColor;
G2antt1->SelForeColor = G2antt1->ForeColor;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h1 = var_Items->AddItem(TVariant("Task 1"));
	var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant(""),TNoParam());
	long h2 = var_Items->AddItem(TVariant("Task 2"));
	var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant(""),TNoParam());
	var_Items->AddLink(TVariant("L1"),h1,TVariant(""),h2,TVariant(""));
	long h3 = var_Items->AddItem(TVariant("Task 3"));
	var_Items->AddBar(h3,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant(""),TNoParam());
	var_Items->AddLink(TVariant("L2"),h2,TVariant(""),h3,TVariant(""));
	long h4 = var_Items->AddItem(TVariant("Task 3"));
	var_Items->AddBar(h4,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,3).operator double()),TVariant(""),TNoParam());
	var_Items->AddLink(TVariant("L3"),h2,TVariant(""),h4,TVariant(""));
	var_Items->set_DefSchedulePDM(Exg2anttlib_tlb::DefSchedulePDMEnum::exPDMCriticalPathBarColor,TVariant(255));
	var_Items->set_DefSchedulePDM(Exg2anttlib_tlb::DefSchedulePDMEnum::exPDMCriticalPathLinkColor,TVariant(255));
	var_Items->SchedulePDM(0,TVariant(""));
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->set_PaneWidth(false,128);
	Exg2anttlib_tlb::IBarsPtr var_Bars = var_Chart->Bars;
		var_Bars->AddShapeCorner(TVariant(12345),TVariant(1));
		Exg2anttlib_tlb::IBarPtr var_Bar = var_Bars->Copy(L"Milestone",L"Original");
			var_Bar->StartShape = Exg2anttlib_tlb::ShapeCornerEnum(0x3020 | Exg2anttlib_tlb::ShapeCornerEnum::exShapeIconVBar | Exg2anttlib_tlb::ShapeCornerEnum::exShapeIconRight);
			var_Bar->StartColor = -1;
		Exg2anttlib_tlb::IBarPtr var_Bar1 = var_Bars->Copy(L"Milestone",L"Red");
			var_Bar1->StartShape = Exg2anttlib_tlb::ShapeCornerEnum(0x3020 | Exg2anttlib_tlb::ShapeCornerEnum::exShapeIconVBar | Exg2anttlib_tlb::ShapeCornerEnum::exShapeIconRight);
			var_Bar1->StartColor = RGB(255,0,0);
		Exg2anttlib_tlb::IBarPtr var_Bar2 = var_Bars->Copy(L"Milestone",L"Green");
			var_Bar2->StartShape = Exg2anttlib_tlb::ShapeCornerEnum(0x3020 | Exg2anttlib_tlb::ShapeCornerEnum::exShapeIconVBar | Exg2anttlib_tlb::ShapeCornerEnum::exShapeIconRight);
			var_Bar2->StartColor = RGB(0,255,0);
G2antt1->Columns->Add(L"Column");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("Original"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,2).operator double()),TNoParam(),TNoParam());
	var_Items->AddBar(var_Items->AddItem(TVariant("Red")),TVariant("Red"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,2).operator double()),TNoParam(),TNoParam());
	var_Items->AddBar(var_Items->AddItem(TVariant("Green")),TVariant("Green"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,2).operator double()),TNoParam(),TNoParam());
G2antt1->EndUpdate();

G2antt1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
G2antt1->Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Exg2anttlib_tlb::IBarsPtr var_Bars = G2antt1->Chart->Bars;
	var_Bars->AddShapeCorner(TVariant(12345),TVariant(1));
	Exg2anttlib_tlb::IBarPtr var_Bar = var_Bars->get_Item(TVariant("Milestone"));
		var_Bar->StartShape = Exg2anttlib_tlb::ShapeCornerEnum(0x3020 | Exg2anttlib_tlb::ShapeCornerEnum::exShapeIconVBar | Exg2anttlib_tlb::ShapeCornerEnum::exShapeIconRight);
		var_Bar->StartColor = -1;
G2antt1->Columns->Add(L"Column");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddBar(var_Items->AddItem(TVariant("Item 1")),TVariant("Milestone"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,2).operator double()),TNoParam(),TNoParam());

G2antt1->Chart->set_PaneWidth(false,128);
G2antt1->Columns->Add(L"Default");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("Item"));
	G2antt1->Chart->set_ItemBackColor(h,RGB(0,255,0));
	G2antt1->Items->set_ItemBackColor(h,RGB(0,255,0));

// BarResize event - Occurs when a bar is moved or resized.
void __fastcall TForm1::G2antt1BarResize(TObject *Sender,Exg2anttlib_tlb::HITEM   Item,Variant   Key)
{
	G2antt1->Items->SchedulePDM(Item,TVariant(Key));
}

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->set_PaneWidth(false,48);
	var_Chart->NonworkingDays = 0;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h1 = var_Items->AddItem(TVariant("Task 1"));
	var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K1"),TNoParam());
	long h2 = var_Items->AddItem(TVariant("Task 2"));
	var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K2"),TNoParam());
	var_Items->AddLink(TVariant("L1"),h1,TVariant("K1"),h2,TVariant("K2"));
	long h3 = var_Items->AddItem(TVariant("Task 3"));
	var_Items->AddBar(h3,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K3"),TNoParam());
	var_Items->AddLink(TVariant("L2"),h2,TVariant("K2"),h3,TVariant("K3"));
	long h4 = var_Items->AddItem(TVariant("Task 3"));
	var_Items->AddBar(h4,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,3).operator double()),TVariant("K4"),TNoParam());
	var_Items->AddLink(TVariant("L3"),h2,TVariant("K2"),h4,TVariant("K4"));
	var_Items->set_DefSchedulePDM(Exg2anttlib_tlb::DefSchedulePDMEnum::exPDMCriticalPathBarColor,TVariant(255));
	var_Items->set_DefSchedulePDM(Exg2anttlib_tlb::DefSchedulePDMEnum::exPDMCriticalPathLinkColor,TVariant(255));
	var_Items->SchedulePDM(0,TVariant("K1"));
G2antt1->EndUpdate();

Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->FirstWeekDay = var_Chart->LocFirstWeekDay;
	var_Chart->MonthNames = var_Chart->LocMonthNames;
	var_Chart->WeekDays = var_Chart->LocWeekDays;
	var_Chart->AMPM = var_Chart->LocAMPM;
	var_Chart->LevelCount = 2;
	var_Chart->set_PaneWidth(false,0);
	var_Chart->UnitScale = Exg2anttlib_tlb::UnitEnum::exDay;
	Exg2anttlib_tlb::ILevelPtr var_Level = var_Chart->get_Level(0);
		var_Level->set_Label(TVariant("<%mmmm%> <%d%>, <%loc_yyyy%> <r><%ww%>"));
		var_Level->Unit = Exg2anttlib_tlb::UnitEnum::exWeek;
		var_Level->set_ToolTip(TVariant(var_Level->get_Label()));
	var_Chart->ToolTip = L"<%ddd%> <%m%>/<%d%>/<%loc_yyyy%>";
G2antt1->Description[Exg2anttlib_tlb::DescriptionTypeEnum::exFilterBarDateMonths] = G2antt1->Chart->MonthNames;
G2antt1->DefaultEditorOption[Exg2anttlib_tlb::EditorOptionEnum::exDateMonths] = TVariant(G2antt1->Chart->MonthNames);

Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->FirstWeekDay = var_Chart->LocFirstWeekDay;
	var_Chart->MonthNames = var_Chart->LocMonthNames;
	var_Chart->WeekDays = var_Chart->LocWeekDays;
	var_Chart->AMPM = var_Chart->LocAMPM;
	var_Chart->LevelCount = 2;
	var_Chart->set_PaneWidth(false,0);

Exg2anttlib_tlb::IAppearancePtr var_Appearance = G2antt1->VisualAppearance;
	var_Appearance->Add(1,TVariant("C:/Program Files/Exontrol/ExG2antt/Sample/EBN/2task--.ebn"));
	var_Appearance->Add(2,TVariant("C:/Program Files/Exontrol/ExG2antt/Sample/EBN/2task-.ebn"));
	var_Appearance->Add(3,TVariant("C:/Program Files/Exontrol/ExG2antt/Sample/EBN/2task.ebn"));
	var_Appearance->Add(4,TVariant("C:/Program Files/Exontrol/ExG2antt/Sample/EBN/2task+.ebn"));
	var_Appearance->Add(5,TVariant("C:/Program Files/Exontrol/ExG2antt/Sample/EBN/2task++.ebn"));
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->set_PaneWidth(false,128);
	var_Chart->NonworkingDays = 0;
	var_Chart->Bars->Copy(L"Task",L"--")->Color = 0x1000000;
	var_Chart->Bars->Copy(L"Task",L"-")->Color = 0x2000000;
	var_Chart->Bars->get_Item(TVariant("Task"))->Color = 0x3000000;
	var_Chart->Bars->Copy(L"Task",L"+")->Color = 0x4000000;
	var_Chart->Bars->Copy(L"Task",L"++")->Color = 0x5000000;
G2antt1->Columns->Add(L"Brightness");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("0%"));
	var_Items->AddBar(h,TVariant("--"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("--"),TNoParam());
	var_Items->AddBar(h,TVariant("-"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("-"),TNoParam());
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant(""),TNoParam());
	var_Items->AddBar(h,TVariant("+"),TVariant(TDateTime(2001,1,11).operator double()),TVariant(TDateTime(2001,1,13).operator double()),TVariant("+"),TNoParam());
	var_Items->AddBar(h,TVariant("++"),TVariant(TDateTime(2001,1,14).operator double()),TVariant(TDateTime(2001,1,16).operator double()),TVariant("++"),TNoParam());
	h = var_Items->AddItem(TVariant("25%"));
	var_Items->AddBar(h,TVariant("--"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("--"),TNoParam());
	var_Items->AddBar(h,TVariant("-"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("-"),TNoParam());
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant(""),TNoParam());
	var_Items->AddBar(h,TVariant("+"),TVariant(TDateTime(2001,1,11).operator double()),TVariant(TDateTime(2001,1,13).operator double()),TVariant("+"),TNoParam());
	var_Items->AddBar(h,TVariant("++"),TVariant(TDateTime(2001,1,14).operator double()),TVariant(TDateTime(2001,1,16).operator double()),TVariant("++"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("<*>"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarTransparent,TVariant(25));
	h = var_Items->AddItem(TVariant("50%"));
	var_Items->AddBar(h,TVariant("--"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("--"),TNoParam());
	var_Items->AddBar(h,TVariant("-"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("-"),TNoParam());
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant(""),TNoParam());
	var_Items->AddBar(h,TVariant("+"),TVariant(TDateTime(2001,1,11).operator double()),TVariant(TDateTime(2001,1,13).operator double()),TVariant("+"),TNoParam());
	var_Items->AddBar(h,TVariant("++"),TVariant(TDateTime(2001,1,14).operator double()),TVariant(TDateTime(2001,1,16).operator double()),TVariant("++"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("<*>"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarTransparent,TVariant(50));
	h = var_Items->AddItem(TVariant("75%"));
	var_Items->AddBar(h,TVariant("--"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("--"),TNoParam());
	var_Items->AddBar(h,TVariant("-"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("-"),TNoParam());
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant(""),TNoParam());
	var_Items->AddBar(h,TVariant("+"),TVariant(TDateTime(2001,1,11).operator double()),TVariant(TDateTime(2001,1,13).operator double()),TVariant("+"),TNoParam());
	var_Items->AddBar(h,TVariant("++"),TVariant(TDateTime(2001,1,14).operator double()),TVariant(TDateTime(2001,1,16).operator double()),TVariant("++"),TNoParam());
	var_Items->set_ItemBar(h,TVariant("<*>"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarTransparent,TVariant(75));

G2antt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->Bars->get_Item(TVariant("Task"))->Color = 0x1000000;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->set_PaneWidth(false,128);
G2antt1->Columns->Add(L"Brightness");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("0%"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
	h = var_Items->AddItem(TVariant("25%"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
	var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarTransparent,TVariant(25));
	h = var_Items->AddItem(TVariant("50%"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
	var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarTransparent,TVariant(50));
	h = var_Items->AddItem(TVariant("75%"));
	var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
	var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarTransparent,TVariant(75));

G2antt1->BeginUpdate();
G2antt1->MarkSearchColumn = false;
G2antt1->OnResizeControl = Exg2anttlib_tlb::OnResizeControlEnum::exResizeChart;
G2antt1->Columns->Add(L"Tasks");
G2antt1->Columns->Add(L"Start")->Visible = false;
G2antt1->Columns->Add(L"End")->Visible = false;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->LevelCount = 2;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2006,9,18).operator double()));
	var_Chart->set_PaneWidth(false,64);
	var_Chart->set_ScrollRange(Exg2anttlib_tlb::ScrollRangeEnum::exStartDate,TVariant(var_Chart->get_FirstVisibleDate()));
	var_Chart->set_ScrollRange(Exg2anttlib_tlb::ScrollRangeEnum::exEndDate,TVariant(TDateTime(2006,12,31).operator double()));
	var_Chart->MarkSelectDateColor = 0x7fff0000;
	var_Chart->SelectLevel = 1;
	var_Chart->set_SelectDate(TDateTime(2006,9,19).operator double(),true);
	var_Chart->AllowCreateBar = Exg2anttlib_tlb::CreateBarEnum::exNoCreateBar;
	var_Chart->AllowLinkBars = false;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h = var_Items->AddItem(TVariant("Project"));
	var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(TDateTime(2006,9,21).operator double()));
	var_Items->set_CellValue(TVariant(h),TVariant(2),TVariant(TDateTime(2006,10,3).operator double()));
	var_Items->AddBar(h,TVariant("Summary"),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(2))),TVariant("sum"),TNoParam());
	long h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
	var_Items->set_CellValue(TVariant(h1),TVariant(1),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(1))));
	var_Items->set_CellValue(TVariant(h1),TVariant(2),TVariant(TDateTime(2006,9,24).operator double()));
	var_Items->AddBar(h1,TVariant("Task"),TVariant(var_Items->get_CellValue(TVariant(h1),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h1),TVariant(2))),TVariant("K1"),TNoParam());
	var_Items->set_ItemBar(h1,TVariant("K1"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarMinStart,TVariant(TDateTime(2006,9,20).operator double()));
	long h2 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
	var_Items->set_CellValue(TVariant(h2),TVariant(1),TVariant(var_Items->get_CellValue(TVariant(h1),TVariant(2))));
	var_Items->set_CellValue(TVariant(h2),TVariant(2),TVariant(TDateTime(2006,9,28).operator double()));
	var_Items->AddBar(h2,TVariant("Unknown"),TVariant(var_Items->get_CellValue(TVariant(h2),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h2),TVariant(2))),TVariant("K2"),TNoParam());
	var_Items->AddLink(TVariant("L1"),h1,TVariant("K1"),h2,TVariant("K2"));
	long h3 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
	var_Items->set_CellValue(TVariant(h3),TVariant(1),TVariant(var_Items->get_CellValue(TVariant(h2),TVariant(2))));
	var_Items->set_CellValue(TVariant(h3),TVariant(2),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(2))));
	var_Items->AddBar(h3,TVariant("Task"),TVariant(var_Items->get_CellValue(TVariant(h3),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h3),TVariant(2))),TVariant("K3"),TNoParam());
	var_Items->AddLink(TVariant("L2"),h2,TVariant("K2"),h3,TVariant("K3"));
	var_Items->GroupBars(h1,TVariant("K1"),false,h2,TVariant("K2"),true,TVariant(31),TVariant("0;4"));
	var_Items->GroupBars(h2,TVariant("K2"),false,h3,TVariant("K3"),true,TVariant(31),TVariant("0;2"));
	var_Items->DefineSummaryBars(h,TVariant("sum"),h1,TVariant("K1"));
	var_Items->DefineSummaryBars(h,TVariant("sum"),h2,TVariant("K2"));
	var_Items->DefineSummaryBars(h,TVariant("sum"),h3,TVariant("K3"));
	var_Items->set_ExpandItem(h,true);
	var_Items->set_ItemBold(h,true);
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Chart->set_PaneWidth(true,0);
G2antt1->MarkSearchColumn = false;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Car");
		var_Column->DisplayFilterButton = true;
		var_Column->FilterType = Exg2anttlib_tlb::FilterTypeEnum::exFilter;
		var_Column->Filter = L"MAZDA";
	Exg2anttlib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"Equipment");
		var_Column1->DisplayFilterButton = true;
		var_Column1->DisplayFilterPattern = false;
		var_Column1->CustomFilter = L"Air Bag||*Air Bag*|||Air condition||*Air condition*|||ABS||*ABS*|||ESP||*ESP*";
		var_Column1->FilterType = Exg2anttlib_tlb::FilterTypeEnum::exPattern;
		var_Column1->Filter = L"AIR BAG";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("Mazda"))),TVariant(1),TVariant("Air Bag"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("Toyota"))),TVariant(1),TVariant("Air Bag,Air condition"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("Ford"))),TVariant(1),TVariant("Air condition"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("Nissan"))),TVariant(1),TVariant("Air Bag,ABS,ESP"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("Mazda"))),TVariant(1),TVariant("Air Bag, ABS,ESP"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("Mazda"))),TVariant(1),TVariant("ABS,ESP"));
G2antt1->ApplyFilter();
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Chart->set_PaneWidth(true,0);
G2antt1->MarkSearchColumn = false;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
	Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Car");
		var_Column->DisplayFilterButton = true;
		var_Column->FilterType = Exg2anttlib_tlb::FilterTypeEnum::exFilterDoCaseSensitive | Exg2anttlib_tlb::FilterTypeEnum::exFilter;
		var_Column->Filter = L"Mazda";
	Exg2anttlib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"Equipment");
		var_Column1->DisplayFilterButton = true;
		var_Column1->DisplayFilterPattern = false;
		var_Column1->CustomFilter = L"Air Bag||*Air Bag*|||Air condition||*Air condition*|||ABS||*ABS*|||ESP||*ESP*";
		var_Column1->FilterType = Exg2anttlib_tlb::FilterTypeEnum::exFilterDoCaseSensitive | Exg2anttlib_tlb::FilterTypeEnum::exPattern;
		var_Column1->Filter = L"Air Bag";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("Mazda"))),TVariant(1),TVariant("Air Bag"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("Toyota"))),TVariant(1),TVariant("Air Bag,Air condition"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("Ford"))),TVariant(1),TVariant("Air condition"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("Nissan"))),TVariant(1),TVariant("Air Bag,ABS,ESP"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("Mazda"))),TVariant(1),TVariant("Air Bag, ABS,ESP"));
	var_Items->set_CellValue(TVariant(var_Items->AddItem(TVariant("Mazda"))),TVariant(1),TVariant("ABS,ESP"));
G2antt1->ApplyFilter();
G2antt1->EndUpdate();

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
	var_Chart->set_PaneWidth(false,48);
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	long h1 = var_Items->AddItem(TVariant("Task 1"));
	var_Items->AddBar(h1,TVariant(""),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,8).operator double()),TVariant("K1"),TVariant("Leave Blank"));
	var_Items->set_ItemBar(h1,TVariant("K1"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarSelectable,TVariant(false));
	var_Items->set_ItemBar(h1,TVariant("K1"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarBackColor,TVariant(255));
G2antt1->EndUpdate();

// ChartEndChanging event - Occurs after the chart has been changed.
void __fastcall TForm1::G2antt1ChartEndChanging(TObject *Sender,Exg2anttlib_tlb::BarOperationEnum   Operation)
{
	OutputDebugString( L"End Operation(exVSplitterChange(10)" );
	OutputDebugString( L"Operation" );
	OutputDebugString( L"PaneWidth:" );
	OutputDebugString( PChar(G2antt1->Chart->get_PaneWidth(false)) );
}

// ChartStartChanging event - Occurs when the chart is about to be changed.
void __fastcall TForm1::G2antt1ChartStartChanging(TObject *Sender,Exg2anttlib_tlb::BarOperationEnum   Operation)
{
	OutputDebugString( L"Start Operation(exVSplitterChange(10)" );
	OutputDebugString( L"Operation" );
	OutputDebugString( L"PaneWidth:" );
	OutputDebugString( PChar(G2antt1->Chart->get_PaneWidth(false)) );
}

G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
	var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2000,12,29).operator double()));
	var_Chart->set_PaneWidth(false,64);
	var_Chart->LevelCount = 2;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
	var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K1"),TNoParam());
	var_Items->AddBar(var_Items->AddItem(TVariant("Task 2")),TVariant("Task"),TVariant(TDateTime(2001,1,4).operator double()),TVariant(TDateTime(2001,1,6).operator double()),TVariant("K2"),TNoParam());
	var_Items->AddBar(var_Items->AddItem(TVariant("Task 3")),TVariant("Task"),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant("K3"),TNoParam());
	long h = var_Items->AddItem(TVariant(""));
	var_Items->AddBar(h,TVariant(""),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant(""),TVariant("<b>Right click</b> the chart, start dragging to select multiple bars<br>or click a bar while pressing the <b>CTRL</b> key"));
	var_Items->set_ItemHeight(h,36);
	var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarSelectable,TVariant(false));
G2antt1->EndUpdate();